r - 获取要包装在R/Kable()HTML表中的列名

Question

我正在尝试从R数据帧生成HTML表输出，并且无法获取一些长列名称来包装多行标题行。这是我当前代码和输出的最小可复制示例:

library(datasets)
library(knitr)
library(kableExtra)

data(iris)

将虹膜表的前5行输出为html格式表:

sink('my_file_path.html')
names_spaced <- c('Sepal Length', 'Sepal Width', 'Petal Length', 
                  'Petal Width Long Col Name', 'Species')

kable(head(iris), 
      format='html', 
      digits=1, 
      row.names=FALSE, 
      align='lccccc', 
      col.names = names_spaced)

sink()

在浏览器中打开保存的文件时，标题行只有一行，但是我需要将这些单词换行到一行或两行(因此为 'Petal Width Long Col Name')。
kable_styling函数具有一个参数 bootstrap_options，但似乎没有我需要的参数。我也尝试在列名称中插入 \n，但无济于事。

如果解决方案的一部分，我不反对使用 xtable包而不是 kable/ knitr。

Answer 1

可以使用HTML语法创建换行符。为了使它起作用，您必须将escape的kable参数设置为FALSE。

library(knitr)
data(iris)

sink('my_file_path.html')
names_spaced <- c(
  'Sepal Length', 'Sepal Width', 'Petal Length', 
  'Petal Width<br/> Long Col Name',                  ## add <br/>
  'Species')

kable(head(iris), 
      format='html', 
      digits=1, 
      row.names=FALSE, 
      align='lccccc', 
      col.names = names_spaced,
      escape = FALSE)                                ## disable html escape to 
                                                     ## make <br/> work

sink()