小编jim*_*mbo的帖子

使用map函数为我在下面创建的每个ggplot添加标题的最简单方法是什么？我希望标题反映每个数据框的名称 - 即4,6,8(圆柱体).

谢谢 :)

mtcars_split <- 
  mtcars %>%
  split(mtcars$cyl)

plots <-
  mtcars_split %>%
  map(~ ggplot(data=.,mapping = aes(y=mpg,x=wt)) + 
        geom_jitter() 
  # + ggtitle(....))

plots