Как получить вертикальные заголовки для работы, используя пакет GT в RStudio? ⇐ CSS

[Anonymous]

Я пытаюсь воссоздать эту таблицу, используя GT в rstudio.
Я работаю в целом, но метки заголовка продолжают блокироваться. < /p>

Код: Выделить всё

   gt_ra %
gt(id = "gtra") %>%
tab_options(column_labels.padding = px(95) ) %>%
cols_align("left", everything()) %>%
cols_align("center", columns = 1) %>%
opt_css( css =
"#gtra .gt_col_heading {
text-align: center;
transform: rotate(-90deg);
font-weight: bold;
} " )

gt_ra
< /code>
И когда я добавляю размер столбца, он испортится ... < /p>
gt_ra %
gt(id = "gtra") %>%
tab_options(column_labels.padding = px(95) ) %>%
cols_width(hazard_name ~ px (150)
, everything() ~ px(50)) %>%
cols_align("left", everything()) %>%
cols_align("center", columns = 1) %>%
opt_css( css =
"#gtra .gt_col_heading {
text-align: center;
transform: rotate(-90deg);
font-weight: bold;
} " )

gt_ra

Подробнее здесь: https://stackoverflow.com/questions/794 ... in-rstudio