如何将标题附加到我在R中写出的CSV文件中?

时间:2014-04-05 02:47:04

标签: r

我可以将数据框导出为CSV文件,但在此之前我需要附加两行信息。我没有写出列名。

Trend data
110

此处,"趋势数据"只是一个文字。并且,110是我写出的数据帧中的行数。

如何将此信息附加到我在R中写出的csv文件的标题中?

谢谢!

2 个答案:

答案 0 :(得分:2)

应该这样做:

x <- 1:110

writeLines(c("Trend data","110"), "myfile.dat")
write.table(x, "myfile.dat", col.names=FALSE, row.names=FALSE, append=TRUE)

从Mac OS X终端查看:

$ head myfile.dat
Trend data
110
1
2
3
4
5
6
7
8

答案 1 :(得分:1)

您还可以使用write.tablesink。如果需要,sink功能会将R输出转移到指定文件,并将其附加到文件中已有的文件中。

> x <- data.frame(x = letters[1:5])

> write.table("Trend Data\n110", row.names = FALSE, 
              col.names = FALSE, quote = FALSE, file = "my.csv")
> sink("my.csv", append = TRUE)
> x
> sink()

> write.table(readLines("my.csv"), row.names = FALSE,
              col.names = FALSE, quote = FALSE)
Trend Data
110
  x
1 a
2 b
3 c
4 d
5 e