在本论坛本版各位同学特别是epoh大师的帮助下，我学会了如何
通过安装Rtools去实现R和C的混合编程的初步方法，当然主要是
利用dot-C函数，至于dot-Call和Rcpp的方法则没有涉及。

R-C混合编程主要是要利用R做程序主要部分的便捷和C做程序循环部分的快捷。
下面有一例（PS:这个例子是我通过何书元《概率论》P166的例3.3的思想自己构造的，
何老师在书上说：只要测量仪器没有系统偏差，测量精度总可以通过多次测量的平均来改进）
#-----------------------------
#程序跑1000次
n=1000
#首先产生1000行3列元素全为零的矩阵m
m <- matrix(numeric(n*3), ncol = 3)
#下面做循环，进而对矩阵m的元素进行赋值
for (i in 1:n){
x <- rexp(200) #方差为1
y <- rpois(200,2) #方差为2
z<-rnorm(200,1,2) #方差为4
m[i,]<-c(var(x),var(y),var(z)) #1000次中每次结果放在矩阵m的每行
}
#对矩阵m求列平均，得到各自最终的方差
final=apply(m,2,mean)
final

我的问题是：如何用C程序去实现上面R程序的循环部分？能用dot-C的方法就更好了。