如何解开多个物体？

Question

我正在尝试读取一个大型CSV文件并将其腌制。同时，我尝试从数据库读取一些记录（是否还需要腌制？）并从腌制的csv记录中进行批量更新。

目前我是这样写的；

library(dplyr)
data %>%
  count(year, month , wt = outcome == "positive") %>%
  ggplot(aes(x=month, y= n, group = year, fill = year)) + 
  geom_col(position = "dodge") +
  scale_x_continuous(breaks = 1:12, labels = month.abb)

此仅返回单行。 我该如何用酸洗呢？这种方法对吗？