小编Luk*_*ins的帖子

有没有办法在一串管道dplyr函数中包含对write.csv的调用？

library(dplyr)
mtcars %>% 
  filter(cyl == 4) %>% 
  write.csv(file = "firstStage.csv") %>% 
  group_by(carb) %>% 
  summarise(hp.sum = sum(hp)) %>%
  write.csv(file = "secondStage.csv")

我可以创建自己的函数:

csv2go <- function(x, ...) {
  write.csv(x, ...)
  x
}

但是想知道在base或dplyr中是否存在这样的事情.也许write_csv()函数library(readr)可以采用这个选项？

我正在使用ggplot制作一个图形,图例位于图表的水平上方.我的变量有多个图例(即颜色,形状,线型).

+ theme(legend.position = 'top', legend.direction = "horizontal", legend.box = "horizontal")

无论如何,将每个图例的标题放在描述之上而不是侧面

和/或

将密钥放在标签文本上方.