Я использую пакет mgcv в R, чтобы подогнать некоторые полиномиальные сплайны к некоторым данным через:

x.gam <- gam(cts ~ s(time, bs = "ad"), data = x.dd,
             family = poisson(link = "log"))

Я пытаюсь извлечь функциональную форму подгонки.x.gam этоgamObjectи я читал документацию, но не нашел достаточно информации для того, чтобы вручную восстановить подобранную функцию.

x.gam$smooth содержит информацию о том, были ли размещены узлы;x.gam$coefficients дает коэффициенты сплайна, но я не знаю, в каком порядке используются полиномиальные сплайны, и поиск в коде ничего не выявил.

Есть ли аккуратный способ извлечения используемых узлов, коэффициентов и базиса, чтобы можно было вручную восстановить подгонку?