Um recurso muito legal doggplot2 um pacote que eu nunca realmente explorava o suficiente estava adicionando listas de camadas a um gráfico. O mais divertido disso foi que eu poderia passar uma lista de camadas como argumento para uma função e adicioná-las à plotagem. Eu poderia então obter a aparência desejada do gráfico sem necessariamente retornar o gráfico da função (se essa é uma boa ideia ou não é outra questão, mas era possível).

library(ggplot2)
x <- ggplot(mtcars,
            aes(x = qsec,
                y = mpg)) 

layers <- list(geom_point(),
               geom_line(),
               xlab("Quarter Mile Time"),
               ylab("Fuel Efficiency"))

x + layers

Existe uma maneira de fazer isso com tubos? Algo semelhante a:

#* Obviously isn't going to work
library(dplyr)
action <- list(group_by(am, gear),
               summarise(mean = mean(mpg),
                         sd = sd(mpg)))

mtcars %>% action