我希望gt表中的每隔一行都是"grey"。
"grey"
library(palmerpenguins) library(gt) penguins %>% dplyr::select(1:3) %>% dplyr::slice(1:10) %>% gt()
rwqw0loc1#
我们可以使用opt_stylize:设置gt表样式的最简单方法是通过opt_stylize()应用预先安装的主题。
opt_stylize
library(palmerpenguins) library(gt) penguins |> dplyr::select(1:3) %>% dplyr::slice(1:10) %>% gt()|> opt_stylize(style = 1)
lndjwyie2#
可以使用tab_style:
tab_style
penguins %>% dplyr::select(1:3) %>% dplyr::slice(1:10) %>% gt() %>% tab_style(style = cell_fill(color = "grey"), locations = cells_body(rows = seq(1, 10, 2)))
gtExtras::gt_highlight_rows:
gtExtras::gt_highlight_rows
penguins %>% dplyr::select(1:3) %>% dplyr::slice(1:10) %>% gt() %>% gtExtras::gt_highlight_rows(rows = seq(1, 10, 2), fill = "grey", font_weight = NULL)
2条答案
按热度按时间rwqw0loc1#
我们可以使用
opt_stylize
:设置gt表样式的最简单方法是通过opt_stylize()应用预先安装的主题。lndjwyie2#
可以使用
tab_style
:gtExtras::gt_highlight_rows
: