r：readr：write_csvファイルを圧縮する方法は？

Question

20MB以上のCSVファイルはメールに丁寧ではありません。 ユーザーは最小限のコードでファイルを圧縮する方法を教えてください。

非zip形式のタスクは次のとおりです。

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

zip関数を使用して、csvファイルの圧縮バージョンを作成できます。

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

これはすべてのプラットフォームで機能するはずですが、外部プログラムが使用されていることに注意してください。 zipのmanページあたりとして：Unix系を問わずに

、「郵便番号」のデフォルトは、デフォルトであれば「など/ Renviron」に設定されている「R_ZIPCMD」の 値を使用します " unzip ' コマンドが設定中に見つかりました。 Windowsでは、デフォルトの は、パスの にある 'zip'プログラム（例えば、Rtoolsのもの）に依存しています。

Answer 2

.gzの場合は可能です。それは私が

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