主页 / coding / 问题 / 79305849
Accepted
robertspierre
Asked: 2024-12-24 22:41:41 +0800 CST

modelsummary：将标题置于顶部

  • 772

请考虑以下示例：

id <- rep(seq(1,10), each=5)
year <- rep(seq(2021, 2025), times=10)
df <- data.frame(id=id, year=year)
df[["weight"]] <- rnorm(nrow(df), 100, 10)
df[["height"]] <- 2*df$weight+rnorm(nrow(df), 0, 5)
df[["count"]] <- rpois(nrow(df), df$height+rnorm(nrow(df), 0, 5))
mod <- fixest::fepois(count ~ height | id, df)
modelsummary::modelsummary(mod, title="This is my title")

我想要表格顶部的标题：

在此处输入图片描述

1 个回答

  1. Best Answer

    背景信息：

    1. modelsummary使用该tinytable包绘制表格。
    2. tinytable使用Bootstrap 5来设置表格样式。
    3. Bootstrap 5 将标题放在底部，但您可以应用表格类来更改这一点。

    style_tt()您可以使用包中的函数应用表格类tinytable来更改标题的位置。这是此处的文档： https: //vincentarelbundock.github.io/tinytable/vignettes/custom.html#bootstrap-classes

    实际上，它看起来像这样：

    library(modelsummary)
library(tinytable)
modelsummary(models, title = "Hello world!") |>
  style_tt(bootstrap_class = "table caption-top")

    为了方便起见，您可以定义自定义主题以将此更改自动应用于所有表。请参阅此处的文档：

    https://vincentarelbundock.github.io/tinytable/vignettes/theme.html#custom-themes

    • 1

相关问题