99999久久久久久亚洲,欧美人与禽猛交狂配,高清日韩av在线影院,一个人在线高清免费观看,啦啦啦在线视频免费观看www

熱線電話:13121318867

登錄
2018-10-27 閱讀量: 880
關(guān)于R代碼運(yùn)行錯(cuò)誤的問(wèn)題

實(shí)際工作中遇到的:

RUS1m<- matrix(NA,187,36)
for (i in 1:187)
{
??for (j in 1:36)
? ?{
? ? if(is.na(io1m.m[i,j])==TRUE|is.na(io1m.m$US)==TRUE) {NA->RUS1m[i,j]}
? ???else if(io1m.m[i,j]-io1m.m$US<0) {((ebs.m[i+1,j])/eos.m[i,j]*(1+io1m.m$US/12)-(1+io1m.m[i,j]/12))*100->RUS1m[i,j]}
? ?? ?else if(io1m.m[i,j]-io1m.m$US>0) {((ebs.m[i,j])/eos.m[i+1,j]*(1+io1m.m[i,j]/12)-(1+io1m.m$US/12))*100->RUS1m[i,j]}
? ?? ? else {0->RUS1mt[i,j]}
}
}

Error in RUS1m[i, j] <- ((ebs.m[i + 1, j])/eos.m[i, j] * (1 + io1m.m$US/12) -??: replacement has length zero

解決方式:改為as.numeric(ebs.m[i + 1, j])/as.numeric(eos.m[i, j])

0.0000
1
關(guān)注作者
收藏
評(píng)論(0)

發(fā)表評(píng)論

暫無(wú)數(shù)據(jù)
推薦帖子