r - Stargazer 和 gam - 如何包含整个摘要输出？

Question

当使用平滑样条拟合广义加性模型时，stargazer 仅返回主效应，而不是您可以在 中看到的平滑项summary(pros.gam)。观星者也可以归还这些吗？或者是否有其他功能或包可以完成这项工作？

library(ElemStatLearn)
library(mgcv)
library(stargazer)

pros.gam=gam(lpsa~s(lcavol)+s(lweight)+s(age)+s(lbph)+svi
+s(lcp)+gleason+s(pgg45),data=prostate)

summary(pros.gam) # Table should include the smooth terms that are visible here
stargazer(pros.gam,summary=TRUE)

Answer 1

toLatex的utils包做的工作：

require(utils)
toLatex(summary(pros.gam)$s.table) 

输出：

# \begin{tabular}{lD{.}{.}{7}D{.}{.}{7}D{.}{.}{7}D{.}{.}{7}}
# \toprule
 # & \multicolumn{1}{c}{edf} & \multicolumn{1}{c}{Ref.df} & \multicolumn{1}{c}{F} & \multicolumn{1}{c}{p-value} \\
# \midrule
# s(lcavol) & 1.0000000 & 1.0000000 & 48.8654347 & 0.0000000 \\
# s(lweight) & 7.4334733 & 8.3759397 & 2.9521585 & 0.0054553 \\
# s(age) & 1.7609527 & 2.1888342 & 3.2466098 & 0.0402275 \\
# s(lbph) & 1.7480193 & 2.1293872 & 2.3329425 & 0.0998080 \\
# s(lcp) & 3.3087460 & 4.0189658 & 1.3792509 & 0.2484695 \\
# s(pgg45) & 1.1277962 & 1.2388741 & 0.2681440 & 0.6563885 \\
# \bottomrule
# \end{tabular}

Answer 2

我在转换 GAM 模型（mgcv 包）的输出时遇到了同样的问题，我通过 R. Harald Baayen 编写的“itsadug”包得到了我想要的。

将模型摘要转换为 knitr / R Markdown 报告的 Latex / HTML 表格。

data(simdat)

具有随机效应和交互作用的模型：

m1 <- bam(Y ~ Group+te(Time, Trial, by=Group),data=simdat)
summary(m1)
gamtabs(m1, caption='Summary of m1')

有关更多示例，请参见：

vignette("inspect", package="itsadug")