次の形式のcsvファイルがあります。
1 3 1 4
1415670_at 1 8.512147859 8.196725061 8.174426394 8.62388149
1415671_at 2 9.119200527 9.190318548 9.149239039 9.211401637
1415672_at 3 10.03383593 9.575728316 10.06998673 9.735217522
1415673_at 4 5.925999419 5.692092375 5.689299161 7.807354922
1または2ではない列を削除して、このデータを操作しました。
m<-read.csv("table.csv")
smallerdat <- m[ c(1,2, grep("^X1$|^X2$|X1\\.|X2\\." , names(m) ) ) ]
この結果をもう一度csvファイルに保存したいので、次のようにします。
write.csv(smallerdat,"tablemodified.csv",ncolumns=length(smallerdat),sep=",")
しかし、次のようなエラーが発生しました。
Error in cat(list(...), file, sep, fill, labels, append) :
argument 1 (type 'list') cannot be handled by 'cat'
私が持っている質問は、変更されたテーブルをcsvファイルに保存する方法です。何か助けはありますか?