write.csv（）在dplyr链中 [英] write.csv() in dplyr chain

问题描述

我以前遇到过这个问题，但是刚刚将导出功能写在链外。有没有办法在 dplyr 链中添加一个 write.csv 语句？

  library（dplyr）
 
 data_set％>％
过滤器（Date == Sys.Date（）日期== Sys.Date（））％>％
 write.csv（'data_set_twodays.csv'，row.names = F）％>％
 filter（Date = Sys.Date ）％>％
 write.csv（'data_set_today.csv'，row.names = F）
 NULL 
  

解决方案

这在0.2版本中似乎适用于我：

  mtcars％>％filter（cyl == 4）％>％write.csv（。，file =〜/ Desktop / piping.csv）
  pre> 
I've come across this problem before, but just wrote the export function outside of the chain.  Is there a way to include a write.csv statement within a dplyr chain?
library(dplyr)

data_set %>%
filter(Date == Sys.Date() - 1 | Date == Sys.Date()) %>%
write.csv('data_set_twodays.csv', row.names = F) %>%
filter(Date = Sys.Date()) %>%
write.csv('data_set_today.csv', row.names = F)
NULL

解决方案
This appeared to work for me in version 0.2:
mtcars %>% filter(cyl == 4) %>% write.csv(.,file = "~/Desktop/piping.csv")


                        
这篇关于write.csv（）在dplyr链中的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！