r - リスト内のすべての NA 数値をリストの平均値に置き換える

Question

私は 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);
    }
}

エラーは表示されませんが、動作していないようです。データを入力すると、それは同じデータ フレームですが、編集されていません。誰でもこれで私を助けることができますか？