首页 > 解决方案 > 当我使用 R 导出表格时,gt() 中是否有办法删除表格周围奇怪的白色边框?

问题描述

我正在尝试在 R 中导出这个需要具有特定背景颜色的 gt 表,因为我在 PowerPoint 中使用的幻灯片已经具有该背景颜色。但是,当我使用 gtsave() 时,它会在彩色背景周围创建这个奇怪的白色边框。这是我正在使用的代码......我错过了什么?

library(tidyverse)
library(gt)

gtDF <- tibble(a = c(LETTERS),
       b = 1:26) %>%
  gt() %>%
  tab_options(table.font.names = 'Century Gothic',
              table.background.color = "#ECF5F8",
              column_labels.background.color = '#ECF5F8',
              column_labels.font.weight = 'bold',
              heading.title.font.weight = 'strong',
              heading.title.font.size = 14,
              table.font.color = '#1a1364',
              source_notes.font.size = 14,
              table.font.size = 14)

gtsave(gtDF, 'gtDF.png')

标签: r

解决方案


gtsave(gtDF, 'gtDF.png', expand = 0)

应该摆脱白色边框。如果您想使用预定义的颜色向表格添加边框,您可以添加类似的内容

table.border.top.width=10,
table.border.top.color='#ECF5F8',

等到您的tab_options.


推荐阅读