>a<-runif(10000)
>a
>b<-matrix(a,100,100)
>b[,1]=0
>b
>if(b[w,e-1]==1 & b[w,e]<1/3)b[w,e]=0 else if(b[w,e-1]==0 & b[w,e]<0.5)b[w,e]=0 else
>b[w,e]=1
>b
n<-c(1:100) # 'x value'
for(y in 1:100)
print(sum(array(b[,y]==0))/100) #it prints 100 values but 'how can i use these values???'
plot(n, "??????")
我想用 R 做一个图表,但是当我输入这个语句时
plot(n, {for(y in 1:100) sum(array(b[,y]==0))/100 })
效果不好