write.table將NaNs轉換為NA

Question

我有一個數據框

a = data.frame("a"=c(1,2,3,NA,NaN,6),"b"=c(NA,NA,NaN,1,2,3),"c"=c(1,2,NA,NA,5,6))

我正在把它寫到一個文件中

write.table(a,file="t.txt",row.names=FALSE,quote=FALSE,sep="\t")

它將“NaN”轉換為“NA”。 我想保留原始值。 我怎樣才能做到這一點？ 我想在我的t.txt中保留NaN和NA。 但是我在t.txt中獲得了所有NA

Answer 1

我不確定是否可以直接執行此操作，但您始終可以將列轉換為字符，然后編寫它（因為您使用的是quote=FALSE ）。

> a[] <- lapply(a, as.character)
> write.table(a,file="t.txt",row.names=FALSE,quote=FALSE,sep="\t")
> str(read.table("t.txt",header=TRUE))
'data.frame':   6 obs. of  3 variables:
 $ a: num  1 2 3 NA NaN 6
 $ b: num  NA NA NaN 1 2 3
 $ c: int  1 2 NA NA 5 6