从图中删除点

Question

我试图在4个不同的y轴变量上绘制4条线，而在一张图上绘制相同的x轴变量。我目前正在使用：

plot(df$x1, df$y,
     lines(smooth.spline(df$x1, df$y), col="red"),
     main="Decrease over 10 years",
     ylim = c(0, 10),
     xlim = c(0,10),
     xlab="Years",
     ylab="Percentage",
     pch="",
     las = 1
)

points(df$x2, df$y,
       lines(smooth.spline(df$x2, df$y), col="blue")
points(df$x3, df$y,
       lines(smooth.spline(df$x3, df$y), col="green")
points(df$x4, df$y,
       lines(smooth.spline(df$x4, df$y), col="black")

然而，当我绘制这个时，我获得了4条所需的曲线，但也是＆＃34; o＆＃34;沿x轴的点。有没有办法删除这些点（他们不参考数据）？我尝试过使用pch =＆＃34;＆＃34;选项，但这不会删除积分。

谢谢， 标记

Answer 1

我试图用

重现你的问题

set.seed(123)
df<-data.frame(
    x1=sort(rnorm(25, 5, 2)),
    x2=sort(rnorm(25, 5, 2)),
    x3=sort(rnorm(25, 5, 2)),
    x4=sort(rnorm(25, 5, 2))
)
df<-transform(df, y=x1*2-1+rnorm(25))

plot(df$x1, df$y, lines(smooth.spline(df$x1, df$y), col="red"))
points(df$x2, df$y, lines(smooth.spline(df$x2, df$y), col="blue"))
points(df$x3, df$y, lines(smooth.spline(df$x3, df$y), col="green"))
points(df$x4, df$y, lines(smooth.spline(df$x4, df$y), col="black"))

但我在剧情中没有看到任何异常。你能解释一下你的数据与我生成的样本有何不同吗？