title: r:readr:write_csv how to have the file compressed?
body: <p>A CSV file of 20MB+ is not polite to email. 
  How a user can zip the file with least amount of code?</p>
  
  <p>Non zipped task is:</p>
  
  <pre><code>mtcars %&gt;% write_csv('foocars.csv')              
  </code></pre>
  
  <p>read_csv can nicely look at extensions and do unzipping. What would be easiest way of doing (not correct code)</p>
  
  <pre><code>mtcars %&gt;% write_csv('foocars.csv.zip')               
  mtcars %&gt;% write_csv('foocars.csv',zipIt=T)       
  </code></pre>
  
  <p>No linux tar or gz please. It has to be for win users. </p>