如何在RMarkdown中设置GT表格的默认字体大小？

有两种实用方法可以实现全局设置gt表格的默认字体大小：

方法一：自定义gt包装函数 #

自己封装一个带预设字体大小的gt函数，后续所有表格都用这个自定义函数创建：

library(gt)

# 定义自定义gt函数，默认字体大小设为10
my_gt <- function(data, ..., font_size = 10) {
  gt(data, ...) |> 
    tab_options(table.font.size = font_size)
}

# 使用示例：直接调用my_gt替代原生gt
my_gt(mtcars)

如果需要临时调整某张表格的字体大小，还可以通过font_size参数覆盖默认值，比如my_gt(mtcars, font_size = 12)。

方法二：利用gt全局主题选项 #

通过gt的主题系统创建自定义主题，再设置为全局默认主题，这样原生gt()调用会自动应用该主题的设置：

library(gt)

# 创建包含字体大小设置的自定义主题
gt_theme_custom <- function(font_size = 10) {
  gt_theme_default() |>
    tab_options(table.font.size = font_size)
}

# 将自定义主题设为全局默认
options(gt.theme = gt_theme_custom)

# 直接调用gt()即可应用默认字体大小
gt(mtcars)

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