使用write.csv导出不等行的数据

时间:2013-11-08 15:52:08

标签: r list csv export-to-csv

我正在尝试创建一系列data.frame并将它们导出到csv文件以在另一个程序中使用。文件的格式需要是几个相等长度的列,然后是最后一列,其中没有数据。我认为list是执行此操作的合适方法,但我无法将导出的csv文件看作如下所示。

alist <- list(c(100,1,2,3,4,5), list(c(200,1,2,3,4,5)), list(c(300)))

我的最终csv文件看起来应该是这样的:

100 200 300
1   1 
2   2 
3   3 
4   4 
5   5 

有什么建议吗?感谢任何帮助。

1 个答案:

答案 0 :(得分:1)

希望我能正确理解这个问题(如果黑暗回归......)。

写入CSV文件时,R中的

NA值不会造成任何问题,因为write.table中有一个参数,“na”,被描述为字符串到用于数据中的缺失值。因此,在将NA写入文件时,data.frame值可以替换为空。

这是一个小例子:

创建不平衡data.frame

注意空的“300”列和不完整的“400”列。在R中,这些值包含NA值。

df <- data.frame(`100` = c(1,2,3,4,5), `200` = c(1,2,3,4,5), 
                 `300` = NA, `400` = c(letters[1:3], NA, NA), 
                 check.names=FALSE)
df
#   100 200 300  400
# 1   1   1  NA    a
# 2   2   2  NA    b
# 3   3   3  NA    c
# 4   4   4  NA <NA>
# 5   5   5  NA <NA>

将数据写入CSV文件

在这里,我正在写入R工作区中的临时文件,并使用cat(readLines(...))查看它以方便和演示。实际上,您可能会将其写入工作目录中的CSV并使用其他程序打开它。请注意根据输入正确形成CSV文件,但原始数据中NA没有任何内容。

x <- tempfile()
write.csv(df, file = x, na = "", row.names = FALSE)
cat(readLines(x), sep="\n")
# "100","200","300","400"
# 1,1,,"a"
# 2,2,,"b"
# 3,3,,"c"
# 4,4,,
# 5,5,,