使用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)