изменить стиль заголовка форматируемый R

Question

Я пытаюсь использовать 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, ...) курсивом?

Answer 1

Я не знаю пакет formattable, но созданный вами объект make_italic - это функция, которая добавляет теги курсива к символьным объектам.Вы можете использовать это непосредственно в именах столбцов.Поскольку имена меняются, вы больше не можете использовать их в функции formattable для форматирования столбцов, однако вы можете отформатировать эти столбцы в data.frame перед тем, как изменить имена столбцов таким же образом.Немного хакерский, но работает.

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)