用星号(*)替换NA

Question

我有一个数据集，是从我的 .csv 文件中读取的。经过一些编辑工作后，我现在需要将其写成一个 .txt 文件，并且需要满足以下条件：（i）去掉所有引号；（ii）将整个文件中的每个 NA 替换为星号 * ；（iii）排除第一行（变量名）。

到目前为止，以下脚本已经去掉了引号，但我想知道如何添加或完成 (ii) 和 (iii)。

write.table(ped5, "ped5.txt" ,row.names=FALSE)
ped5 <- read.table("ped5.txt", header=TRUE)
write.table(ped5, "ped7.txt", row.names=FALSE, quote=FALSE)

任何帮助都将不胜感激！

- baz

Answer 1

对于（ii），请使用na =“*”，对于（iii），请使用col.names = FALSE。
因此：

write.table(ped5,"ped7.txt",row.names=FALSE,quote=FALSE, na="*", col.names=FALSE)

要找到如何使用write.table函数，可以参考write.table的帮助页面（?write.table）。

- Marek