r：readr：write_csv如何压缩文件？

Question

20MB +的CSV文件对电子邮件不礼貌。 用户如何使用最少量的代码压缩文件？

非压缩任务是：

mtcars %>% write_csv('foocars.csv')              

read_csv可以很好地查看扩展并解压缩。什么是最简单的方法（不正确的代码）

mtcars %>% write_csv('foocars.csv.zip')               
mtcars %>% write_csv('foocars.csv',zipIt=T)       

请不要使用linux tar或gz。它必须是赢得用户。

Answer 1

对于.gz似乎有可能。因为我需要.zip

，这不是完整的答案

write_csv(mtcars,gzfile('mtcars.csv.gz'))
testingIt<-read_csv('mtcars.csv.gz')

Answer 2

您可以使用zip功能创建csv文件的压缩版本。

mtcars %>% write_csv('foocars.csv')
zip("foocars.zip", "foocars.csv")

这适用于所有平台，但请注意使用外部程序。根据{{​​1}}的手册页：

  

在类似Unix的情况下，'zip'的默认值默认使用        'R_ZIPCMD'的值，如果'解压'，则在'etc / Renviron'中设置        在配置期间找到了命令。在Windows上，默认值        依赖于'zip'程序（例如来自Rtools的程序）        路径。