我相信这个图应该看起来像一条平滑的曲线,但我的图显示的是直线连接。有人可以指出我的错误吗?
Y <- c(0,2,-1,4) t = c(1:4) plot(t,Y) c = smooth.spline(t,Y,lambda=1) lines(t,c$y)
谢谢!
您可以使用
loess()
给你:
Y <- c(0,2,-1,4) t = c(1:4) plot(t,Y) lo <- loess(Y~t) lines(predict(lo),col="blue", lwd=1.5)
或者,您可以使用
qplot()
library(ggplot2)
library(ggplot2) qplot(t,Y, geom='smooth', span =0.5)