您可以将具有透明背景的 gt() table 另存为 png 吗？

Question

您好，我想知道是否有办法将使用 gt 包创建的 table 保存为具有透明背景的图像？

下面是一些创建 gt() table 并将 table 保存为 png 的示例代码，但不是透明的

  filter((Sepal.Length==5.1 & Species=='versicolor')) %>%
  select(Sepal.Length,Sepal.Width,Petal.Length,Petal.Width) %>%
  gt() %>%
  tab_spanner(label = "Sepal", columns = vars(Sepal.Length, Sepal.Width)) %>%
  tab_spanner(label = "Petal", columns = vars(Petal.Length, Petal.Width)) %>% 
  tab_options(
    table.background.color = "transparent",
    column_labels.font.size = 10.5,
    table.font.size = 10,
    heading.title.font.size  = 24,
    heading.title.font.weight = 'bold',
    heading.subtitle.font.size = 11,
    table.font.color = 'white',
    table.border.top.color = "#0D2549",
    data_row.padding = px(2), 
    footnotes.font.size = 8,
    source_notes.font.size = 9,
    footnotes.padding = px(1), 
  ) %>%
  opt_table_font(
    font = list(
      google_font("Chivo"),
      default_fonts()
    )
  ) %>%
  gtsave("Image Name.png")

Answer 1

这是我在 Shiny App 中使用 CSS 颜色使 GT table 背景透明的方法。

tab_options(
    table.background.color = "#FFFFFF00",
    column_labels.font.size = px(10),
    column_labels.font.weight = "bold",
    table.font.color = "white",
    table.font.size = px(12L)
)

这是 table 的样子。请注意，Shiny App 的背景是黑色的，因此 table 显示为黑色（尽管它实际上是透明的）。

您可以将具有透明背景的 gt() table 另存为 png 吗？

Can you save a gt() table with a transparent background as a png

transparency

r

gt