r - 使用 ggplot2 添加一条带有较少点的额外线

Question

我正在尝试添加一条包含较少点的额外行。我努力了：

library(ggplot2)
df <- data.frame(x=c(1:50),y=c(1:50)*2+5)
df2 <-  data.frame(x=c(20,30,40),y=c(40,60,80))
plot1 <- ggplot(df , aes(x=x, y=y)) + geom_line()
plot2 <- plot1+ geom_line( aes(x=df2$x, y=df2$y))
plot2    

但这不起作用。

Answer 1

您可以传递df2给data第二个geom_line调用的参数并稍微更改映射

plot2 <- plot1+ geom_line( aes(x=x, y=y), data = df2)