用星号代替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)

非常感谢任何帮助！

Answer 1

对于（ii）使用na = "*"和（iii）col.names=FALSE 所以：

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

在help page to write.table（?write.table）上找到所有内容。