[問題] function欄位處理疑問

作者: mickey1231 (國父)   2017-07-10 23:22:37
[問題類型]:
程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R 寫出來)
[軟體熟悉度]:
入門(寫過其他程式,只是對語法不熟悉)
[問題敘述]:
我的資料有20個欄位,a1~a20
想挑出特定的欄位做相同的運算跟補值
用了lapply、跟function()兩種寫法都有錯誤
lapply會把原本欄位所有的值都變成Missing
function error 顯示Error in `$<-.data.frame`(`*tmp*`, "x", value = character(0)) :
請問我該怎麼修改比較好?
感謝~
[程式範例]:
1.lapply
try=c('a1','a2','a5','a6','a13','a19')
data[try]=lapply(data[try],
function(x) x[which(is.na(x)>0)]="Missing")
2.function()
missing=function(x)
{
data$x[which(is.na(data$x)>0)]="Missing"
}
missing(a1)
[環境敘述]:
R 3.4
[關鍵字]:
作者: locka (locka)   2017-07-11 00:27:00
sapply(try,function(x) ifelse(is.na(data[,x]),"missing",data[,x]))
作者: mickey1231 (國父)   2017-07-14 22:22:00
感謝幫忙!!

Links booklink

Contact Us: admin [ a t ] ucptt.com