小编use*_*207的帖子

我是R的新手,我一直在尝试NA用每列的平均值替换值.我尝试了很多选择.但似乎没有工作.我试过这个和很多类似的但是我继续得到:argument is not numeric or logical: returning NA.

script<-function() {
for (i in names(data)) {
        data[[i]][is.na(data[[i]])] <- mean(data[[i]], na.rm=TRUE);
    }
}

但过了一会儿,我以为我只是计算了这些专栏,然后想出了这个:

script<-function() {
    for (i in 1:20) {
        data[[i]][is.na(data[[i]])] <- mean(data[[i]], na.rm=TRUE);
    }
}

它没有显示任何错误,但似乎也没有.当我输入数据时,它只是相同的数据框,但未经编辑.任何人都可以帮我这个吗？