加载 VGAM 包时，mgcv 中的 s() 不起作用

Question

这个

x <- rnorm(100)
y <- rnorm(100) 
gam(y ~ s(x))
## Family: gaussian 
## Link function: identity 

## Formula:
## y ~ s(x)

## Estimated degrees of freedom:
## 1  total = 2 

## GCV score: 0.8116283

在加载VGAM 包时崩溃：

library(VGAM)
gam(y ~ s(x))
##Error: $ operator is invalid for atomic vectors

两者都实现了s() 功能，但这不应该发生，对吧？这是mgcv 或VGAM 包中的错误吗？

Answer 1

mgcv:gam 调用 mgcv:interpret.gam 失败的地方。

interpret.gam 似乎将公式解析为特殊函数，包括“s”，然后在公式的环境中评估s(x)。这意味着它会从调用者那里找到当前的“s”。这可能是返回 gam 不喜欢的东西。

你不能这样修复它：

> gam(y ~ mgcv::s(x))
Error in model.frame.default(formula = y ~ mgcv::s(x), drop.unused.levels = TRUE) : 
  invalid type (list) for variable 'mgcv::s(x)'
> gam(y ~ mgcv:::s(x))
Error in model.frame.default(formula = y ~ mgcv:::s(x), drop.unused.levels = TRUE) : 
  invalid type (list) for variable 'mgcv:::s(x)'

但你可以这样：

> s=mgcv:::s
> gam(y ~ s(x))

Family: gaussian 
Link function: identity 

Formula:
y ~ s(x)

Estimated degrees of freedom:
1  total = 2 

GCV score: 0.9486058

所以它在任何一个包中都不是错误。您要求与s(x) 进行游戏，并且碰巧当前已将s(x) 定义为与gam 的需求不兼容。您不能只在其中插入任何旧功能。