r - 用R画一条通过给定点（样条）的线

Question

给了我x = c(50, 37, 25, 0)和y = c(30, 52, 65, 70)。这些是包含四个点的 x 和 y 坐标的向量。我需要通过所有四个点绘制一条平滑曲线，并得到这个函数的实际方程。

我如何做到这一点R？

我正在阅读样条曲线的文档，但由于我不熟悉这背后的数学，我很困惑。

Answer 1

x = c(50, 37, 25, 0) 
y = c(30, 52, 65, 70)
plot(x, y)

你必须做三次多项式，然后在图中添加一条曲线

  exe <- lm(y ~ I(x^3) + I(x^2) + x)
    curve(predict(exe, newdata = data.frame(x = x)), 0, 50, add = T)