如何压缩csv文件并使用R将压缩后的文件写入文件夹

Question

我有一个R脚本，它在计算后生成了一个近80000 KB的csv文件。我想把这个csv文件写到文件夹D:/My_Work/Output，文件名为result.zip，作为一个压缩文件。请建议我是否有任何功能或任何方式可以实现这一点。

Answer 1

使用zip函数：

zip(*path to zip*,*path to csv*)

edit：不幸的是，您无法从data.frame直接转到压缩csv。你需要明确地制作csv，但写一个删除csv的包装器并不难，这样你就永远不会知道它是这样的：

zipped.csv <- function(df, zippedfile) {
  # init temp csv
  temp <- tempfile(fileext=".csv")
  # write temp csv
  write.csv(df, file=temp)
  # zip temp csv
  zip(zippedfile,temp)
  # delete temp csv
  unlink(temp)
}

Answer 2

如果您只想在磁盘上节省一些空间，那么使用*.gz压缩会更方便。

write.csv(iris, gzfile("iris.csv.gz"), row.names = FALSE)
iris2 = read.csv("iris.csv.gz")