更改表头样式的formattable R

4

我正在尝试使用formattable对一些物种进行格式化,因此列名以斜体显示非常重要;我已经尝试了formatter()函数,但它只作用于值,即使我使用"th"节点而不是"span"

library(formattable)
make_italic <- formatter("span",
                      style =  "font-style:italic")
formattable(mtcars, list(mpg = make_italic, qsec = make_italic))

在mtcars数据集中,我该如何将(mpg、cyl、disp等)的名称改为斜体字?
1个回答

5

我不知道formattable包是什么,但你创建的make_italic对象是一个函数,可以将斜体标签添加到字符对象中。你可以直接在列名上使用它。因为名称已更改,所以无法再在formattable函数中使用它们来格式化列,但是你可以在更改列名称之前以相同的方式对数据框中的这些列进行格式化。这有点取巧,但是有效。

library(formattable)
data(mtcars)
mtcars_tab        <- mtcars 
make_italic       <- formatter("span", style =  "font-style:italic")
mtcars_tab$mpg    <- make_italic(mtcars_tab$mpg)
mtcars_tab$qsec   <- make_italic(mtcars_tab$qsec)
names(mtcars_tab) <- make_italic(names(mtcars_tab))
formattable(mtcars_tab)

这个解决方法非常棒,它是否也适用于formattable中的某些自定义格式选项呢?比如color_tile,我尝试过 names(dt) <- color_tile(customGreen, customGreen0),但没有成功。 - codesaurus

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接