如何隐藏rbind拼接的modelsummary表格中的Panel行

方法1：调用函数时直接禁用Panel标签 #

在modelsummary()中添加panel.names = NULL参数，即可阻止Panel行的生成：

mod <- lm(mpg~factor(cyl)*disp, mtcars)
fin1 <- marginaleffects::hypotheses(
  mod,
  "`factor(cyl)6`+`factor(cyl)6:disp`=0"
)
fin2 <- marginaleffects::hypotheses(
  mod,
  "`factor(cyl)8`+`factor(cyl)8:disp`=0"
)
fins <- list(fin1, fin2)
modelsummary::modelsummary(fins, stars=TRUE, gof_omit=".*", shape="rbind", panel.names = NULL)

方法2：修改已生成的表格对象 #

如果已经得到了带Panel行的表格对象，可通过modify_table_body()过滤掉对应行：

library(modelsummary)

# 生成初始表格对象（以gt格式为例）
tab <- modelsummary::modelsummary(fins, stars=TRUE, gof_omit=".*", shape="rbind", output = "gt")

# 删除含Panel的行
tab <- modify_table_body(tab, function(x) x[!grepl("Panel", x$groupname_col), ])

# 输出处理后的表格
tab

内容的提问来源于stack exchange，提问作者robertspierre