如何定义我的函数来保存geom_point + geom_line

Question

我想使用有关ggplot的函数f（），但无法成功运行。请告诉我如何解决此问题。

f= function(){
   geom_point() + geom_line() 
}

data_frame = tibble(y_axis = c(1,2,3,1,1,1), 
                    x_axis = c("AD", "B", "C", "A", "B", "C"),
                    g = c("buy", "sell", "buy", "sell", "buy", "sell"))

g2 <- ggplot(data_frame, aes(x=x_axis, y=y_axis, colour = g,group =  g)) + f()

g2

Answer 1

您可以使用函数将其添加到ggplot对象，但是它必须为列表形式。这就是您需要的：

f <- function() {
    list(geom_point(), geom_line())
}

只需按照代码中的指示将其添加到任何ggplot对象中即可。例如：

ggplot(df, aes(x,y)) + f()