如何在ggplot中使用spline()？

Question

我想使用样条曲线(y~x)来拟合我的数据,但我能找到的所有示例都使用具有平滑的样条曲线,例如lm(y~ns(x),df = _).

我想spline()特别使用,因为我使用它来进行我正在制作的情节所代表的分析.

有没有一种简单的方法在ggplot中使用spline()？

我已经考虑了使用拟合线的hackish方法

geom_smooth(aes(x=(spline(y~x)$x, y=spline(y~x)$y))

但我宁愿不必诉诸于此.

谢谢!

Answer 1

这是你想要的吗？

n <- 10
d <- data.frame(x = 1:n, y = rnorm(n))
ggplot(d,aes(x,y)) + geom_point() + 
  geom_line(data=data.frame(spline(d, n=n*10)))