我是R的新手,我正在尝试创建一个如下所示的矩阵: enter image description here
逻辑是对于每一行(x),如果值对应于第一列(y = 0),则减去一个点。否则,对于其余列(y> = 1)值右边的每一步,将添加两个点,最大值= 8。 我尝试了以下方法,但无法正常工作:
m=9
n=5
test=matrix(0,m,n)
rownames(test) <- c("0","1","2","3","4","5","6","7","8")
colnames(test) <- c("O",">=4")
test
for (i in 1:dim(test)[1]) {
for (j in 1:dim(test)[2]) {
if (j<=1) {
test[i,j] = i-2
}
else
{
test[i,j] = i+2
}
}
}
test[test > 8] <- 8
test[test < 0] <- 0
print (test)
任何建议或帮助将不胜感激。