R中的立方回归

Question

我正在尝试将三次曲线拟合到我的散点图中。我能够在minitab中做到这一点没有问题，但我发现很难将三次非线性回归拟合到我的数据中。我的数据设置如下：

AGE Value
3   10
4   10
5   11
5   13
6   10
7   9
8   8

Answer 1

请参阅?poly（默认情况下）在您交给的x值范围内设置指定度数的设计矩阵就绪正交多项式：

df <- read.table(text="AGE Value
3   10
4   10
5   11
5   13
6   10
7   9
8   8", header=TRUE)

lm(Value ~ poly(AGE, degree=3), data=df)

# Call:
# lm(formula = Value ~ poly(AGE, 3), data = df)
# 
# Coefficients:
#   (Intercept)  poly(AGE, 3)1  poly(AGE, 3)2  poly(AGE, 3)3  
#       10.1429        -2.0026        -2.3908         0.6019