R 中的广义可加模型(GAM)非线性建模
Noam Ross
Senior Research Scientist, EcoHealth Alliance
mod_hwy <- gam(hw.mpg ~ s(weight) + s(rpm) +
s(price) + s(comp.ratio) +
s(width) + fuel + cylinders,
data = mpg, method = "REML")
summary(mod_hwy)
分布族:gaussian
链接函数:identity
模型式:
hw.mpg ~ s(weight) + s(rpm) + s(price) + s(comp.ratio) +
s(width) + fuel
参数项系数:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 23.873 3.531 6.760 1.89e-10 ***
fuelgas 7.571 3.922 1.931 0.0551 .
---
显著性代码: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
平滑项的近似显著性:
edf Ref.df F p-value
s(weight) 6.254 7.439 20.909 < 2e-16 ***
s(rpm) 7.499 8.285 8.534 2.07e-09 ***
s(price) 2.681 3.421 1.678 0.155
s(comp.ratio) 1.000 1.001 18.923 2.22e-05 ***
s(width) 1.001 1.001 0.357 0.551
---
显著性代码: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
R-sq.(adj) = 0.89 偏差解释率 = 90.1%
REML = 464.81 方差估计 = 5.171 n = 199
summary(mod_hwy)
分布族:gaussian
链接函数:identity
模型式:
hw.mpg ~ s(weight) + s(rpm) + s(price) +
s(comp.ratio) + s(width) + fuel
...
summary(mod_hwy)
...
参数项系数:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 23.873 3.531 6.760 1.89e-10 ***
fuelgas 7.571 3.922 1.931 0.0551 .
---
显著性代码: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 '
...
summary(mod_hwy)
...
平滑项的近似显著性:
edf Ref.df F p-value
s(weight) 6.254 7.439 20.909 < 2e-16 ***
s(rpm) 7.499 8.285 8.534 2.07e-09 ***
s(price) 2.681 3.421 1.678 0.155
s(comp.ratio) 1.000 1.001 18.923 2.22e-05 ***
s(width) 1.001 1.001 0.357 0.551
---
显著性代码: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
...
平滑项的近似显著性:
edf Ref.df F p-value
s(weight) 6.254 7.439 20.909 < 2e-16 *** <--
s(rpm) 7.499 8.285 8.534 2.07e-09 ***
s(price) 2.681 3.421 1.678 0.155
s(comp.ratio) 1.000 1.001 18.923 2.22e-05 *** <--
s(width) 1.001 1.001 0.357 0.551

平滑项的近似显著性:
edf Ref.df F p-value
s(weight) 6.254 7.439 20.909 < 2e-16 ***
s(rpm) 7.499 8.285 8.534 2.07e-09 ***
s(price) 2.681 3.421 1.678 0.155
s(comp.ratio) 1.000 1.001 18.923 2.22e-05 ***
s(width) 1.001 1.001 0.357 0.551
---
显著性代码: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
平滑项的近似显著性:
edf Ref.df F p-value
s(weight) 6.254 7.439 20.909 < 2e-16 *** <--
s(rpm) 7.499 8.285 8.534 2.07e-09 ***
s(price) 2.681 3.421 1.678 0.155 <--
s(comp.ratio) 1.000 1.001 18.923 2.22e-05 ***
s(width) 1.001 1.001 0.357 0.551

平滑项的近似显著性:
edf Ref.df F p-value
s(weight) 6.254 7.439 20.909 < 2e-16 ***
s(rpm) 7.499 8.285 8.534 2.07e-09 ***
s(price) 2.681 3.421 1.678 0.155 <--
s(comp.ratio) 1.000 1.001 18.923 2.22e-05 *** <--
s(width) 1.001 1.001 0.357 0.551 <--

R 中的广义可加模型(GAM)非线性建模