Estoy usando el paquete mgcv en R para ajustar algunas splines polinómicas a algunos datos a través de:

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

Estoy tratando de extraer la forma funcional del ajuste.x.gam es ungamObject, y he estado leyendo la documentación pero no he encontrado suficiente información para reconstruir manualmente la función ajustada.

x.gam$smooth contiene información sobre si se han colocado los nudos;x.gam$coefficients da los coeficientes de spline, pero no sé en qué orden se utilizan splines polinomiales y mirar en el código no ha revelado nada.

¿Hay alguna forma ordenada de extraer los nudos, los coeficientes y las bases utilizadas para poder reconstruir manualmente el ajuste?