用星號代替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）。