将未知数量的“geom_text”传递给ggplot作为函数参数

Question

我想在我自己的函数中创建图表，最终创建一个ggplot对象。这是为了减少代码重复。由于各种图表可能有不同的要求，因此有一些参数。

不同图表之间的一个变体可能是显示一个或多个geom_text集。我天真地认为，因为+运算符被ggplot重载，我可以在sum()对象列表上调用geom_text，如下所示：

outputPlot <- basePlot +
  geomBar +
  sum(geomTextList) +
  titles +
  theme +
  yScale +
  plotFill +
  if (coordFlip) { coord_flip() } else { NULL }

但是，这会返回Error in sum(geomTextList) : invalid 'type' (list) of argument。

有没有人对我如何能够实现这一点有任何想法，或者我只是为月球拍摄？如果需要，它最终也会延伸到geom_bar的列表......

Answer 1

不需要sum：ggplot2可以处理图层列表，因此以下内容应该有效：

baseplot + geomBar + geomtextList + …