共曲性の確認

Rで学ぶGeneralized Additive Models (GAMs) による非線形モデリング

Noam Ross

Senior Research Scientist, EcoHealth Alliance

共曲性

`concurvity()` 関数

concurvity(m1, full = TRUE)

            para s(X1) s(X2)
worst       0    0.84  0.84
observed    0    0.22  0.57
estimate    0    0.28  0.60

ペアワイズ共曲性

concurvity(model, full = FALSE)

$worst
      para s(X1) s(X2)
para     1  0.00  0.00
s(X1)    0  1.00  0.84
s(X2)    0  0.84  1.00

$observed                |  $estimate
      para s(X1) s(X2)   |        para s(X1) s(X2)
para     1  0.00  0.00   |  para     1  0.00   0.0
s(X1)    0  1.00  0.57   |  s(X1)    0  1.00   0.6
s(X2)    0  0.22  1.00   |  s(X2)    0  0.28   1.0

練習しましょう！

Rで学ぶGeneralized Additive Models (GAMs) による非線形モデリング