新人刚入门,编了个程序
zzz<-function(n){
y<-vector(length=n)
{
for(i in 1:n) xb=mean(sample(c(1,1,2,3,3,5),6,rep=T))
y[i]=xb
}
return(y)
}
求教一下为什么输出的zzz(5)结果是
zzz(5)
[1] 0.000000 0.000000 0.000000 0.000000 2.166667
前面4项并没有累加进向量y?


雷达卡





京公网安备 11010802022788号







