拟合优度部分中的重要星标

Question

通过修改相应的提取功能，将诊断测试结果包含在texreg表中相对简单。例如，我在extract.lm函数中添加了有关KPSS单位根测试的部分：

if (include.kpss == TRUE) {
  KPSS_mu <- summary(ur.kpss(s$residuals, type = "mu"))
  kpss <- KPSS_mu@teststat
  gof <- c(gof, kpss)
  gof.names <- c(gof.names, "KPSS")
  gof.decimal <- c(gof.decimal, TRUE)
}

我想更进一步，在检验统计量中添加显着性星号，这样就可以立即看到是否否定了假设。 texreg默认情况下会为估计系数提供显着性星，但是我还没有找到一种方法将其纳入拟合优度部分。有没有人试图相应地修改texreg？