data=matrix(rnorm(9),3,3)
a=rep(0,3)
for(i in 1:3){a[]=mean(data[,i])}
a=rep(0,3)
for(i in 1:3){a[]=mean(data[,i])}
- 于 删除部分元素
第一个是碰巧得到了正确的结果，代码应该改写为：
x1=c(1,2,3,4,5,6)
x1[x1!=5&x1!=6]相应的最后一个代码改写为下面即可：
x1=c(1,3,4,29,68,4,6,9)
x2=c(4,6)
x1[x1!=x2[1]&x1!=x[2]]