将组件添加到保存在列表中的 ggplot 对象答案

【问题标题】：Add components to ggplot object saved in list将组件添加到保存在列表中的 ggplot 对象
【发布时间】：2018-10-11 19:16:24
【问题描述】：

假设我创建了一个列表，每个元素都包含一个保存的ggplot：

lst <- lapply(1:5, function(X) ggplot(data = mtcars, aes(x=X, y=mpg)) + geom_point())

^{在每个 list 元素中分别找到的 5 个图的图像。}

有什么方法可以在这些保存的图中添加额外的组件？

我试过了：

>lst[1] + ggtitle('Add Title')

Error in lst[1] + ggtitle("Title") : 
  non-numeric argument to binary operator

【问题讨论】：

【解决方案1】：

这是[[ ]]和[ ]之间的区别很重要的情况：

lst <- lapply(1:5, function(X) ggplot(data = mtcars, aes(x=X, y=mpg)) + geom_point())

lst[[1]] + ggtitle('Add Title')

【讨论】：