我得到了x = c(50, 37, 25, 0)和y = c(30, 52, 65, 70)。这些是包含四个点的x和y坐标的向量。我需要画一条通过所有四点的平滑曲线，得到这个函数的实际方程。
如何使用R实现这一点？
我正在阅读样条曲线的文档，但由于我不熟悉这背后的数学，我感到非常困惑。
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)