在 KableExtra 中插入列分隔符
Inserting a column separator in KableExtra
我使用 kableExtra 创建了以下 table。我正在寻找一种可以在 c 列和 d 列之间添加垂直边框的方法（以分隔两个 headers 下的内容。）另外，有没有一种方法可以更改单元格的颜色整列（比如第三列？）
library(dplyr)
library(kableExtra)
a <- c('First', 'Second', 'Third')
b <- c(1,2,3)
c <- c(4,5,6)
d <- c(7,8,9)
e <- c(10,11,12)
df <- data.frame(a,b,c,d,e)
kable(df) %>%
kable_styling() %>%
add_header_above(c("","Header 1" = 2, "Header 2" = 2), bold = T)
尝试：
kable(df) %>%
kable_styling() %>%
add_header_above(c("", "Header 1" = 2, "Header 2" = 2), bold = TRUE) %>%
column_spec(4, border_left = TRUE) %>%
column_spec(3, background = "lightgreen")
我使用 kableExtra 创建了以下 table。我正在寻找一种可以在 c 列和 d 列之间添加垂直边框的方法（以分隔两个 headers 下的内容。）另外，有没有一种方法可以更改单元格的颜色整列（比如第三列？）
library(dplyr)
library(kableExtra)
a <- c('First', 'Second', 'Third')
b <- c(1,2,3)
c <- c(4,5,6)
d <- c(7,8,9)
e <- c(10,11,12)
df <- data.frame(a,b,c,d,e)
kable(df) %>%
kable_styling() %>%
add_header_above(c("","Header 1" = 2, "Header 2" = 2), bold = T)
尝试：
kable(df) %>%
kable_styling() %>%
add_header_above(c("", "Header 1" = 2, "Header 2" = 2), bold = TRUE) %>%
column_spec(4, border_left = TRUE) %>%
column_spec(3, background = "lightgreen")