当使用R中的gt()函数导出表格时,可以通过设置theme参数来去掉表格周围的奇怪白色边框。具体来说,可以使用theme_gt()函数来自定义表格的主题样式,然后通过设置border_color参数为"transparent"来将边框颜色设置为透明,从而去掉表格周围的边框。
下面是一个示例代码:
library(gt)
# 创建一个示例数据框
data <- data.frame(
Name = c("John", "Jane", "Mike"),
Age = c(25, 30, 35),
Salary = c(50000, 60000, 70000)
)
# 创建gt对象并设置主题样式
table <- gt(data) %>%
tab_style(
style = list(
cell_borders(
sides = "all",
color = "transparent"
)
)
)
# 导出表格为HTML文件
gtsave(table, file = "table.html")
在上述代码中,我们首先加载gt库,并创建一个示例数据框。然后,我们使用gt()函数将数据框转换为gt对象,并使用tab_style()函数来设置表格的样式。在style参数中,我们使用cell_borders()函数来设置单元格的边框样式,通过设置color参数为"transparent",将边框颜色设置为透明。最后,我们使用gtsave()函数将表格导出为HTML文件。
这样,导出的表格将不再有奇怪的白色边框。
领取专属 10元无门槛券
手把手带您无忧上云