像这样的矩阵
r<-20;
c<-6;
m1 <- round(matrix(runif(r*c), r, c)))
我想使用 if/ifelse 和布尔运算符创建两个基于最后三个的新列。
我尝试了以下但没有成功:
for (i in 1:dim(m1)[1]){
if(sum(m1[i,4:6]==0)) {m1$Code1[i]<-0;m1$Code2[i]<-0}
else if(sum(m1[i,4:6]==3)) {m1$Code1[i]<-5;m1$Code2[i]<-5}
else if(m1[i,4]==0 && m1[,5]==1) {m1$Code1[i]<-3}
else if(m1[i,4]==0 && m1[,6]==1) {m1$Code2[i]<-3}
else if(m1[i,4]==1 && m1[,5]==0) {m1$Code1[i]<-2}
else if(m1[i,4]==1 && m1[,6]==0) {m1$Code2[i]<-2}
else if(m1[i,4]==1 && m1[,5]==1) {m1$Code1[i]<-4}
else if(m1[i,4]==1 && m1[,6]==1) {m1$Code2[i]<-4}
}
我的问题是我是否可以在 if 子句中使用 &&,但不知何故这不起作用。有人可以给我一个提示为什么或提供更好的选择吗?
在此先感谢,斯蒂芬