andreranza
andreranza

Reputation: 103

How to rotate the column headers with R package gt?

Is there a way to rotate by 90 degrees the column headers with the gt package and make them vertical?

Thanks in advance!

Upvotes: 3

Views: 1480

Answers (2)

lroha
lroha

Reputation: 34601

As Andrew has noted, there's not yet a built-in way of doing this but you can use custom CSS to style the table, although you may need to do some additional fine tuning of the elements to get it to look ok.

library(gt)

head(mtcars) %>%
  gt(id = "mygt") %>%
  tab_options(column_labels.padding = px(15),
              column_labels.padding.horizontal = px(7)) %>%
  cols_align("center", everything()) %>%
  opt_css(
  css = "
    #mygt .gt_col_heading {
      text-align: center;
      transform: rotate(-90deg);
      font-weight: bold;
    }
    "
)

enter image description here

Upvotes: 6

AndrewGB
AndrewGB

Reputation: 16856

It looks like this might not be a feature yet in gt, as it is still in the queue as an enhancement.

Another option would be to use kableExtra (code from here):

library(kableExtra)
library(knitr)

kable(head(mtcars), "html") %>%
  kable_styling("striped", full_width = F) %>%
  row_spec(0, angle = -90)

Output

enter image description here

Or using gridExtra (code from here):

library(gridExtra)
library(grid)

tt = ttheme_default(colhead=list(fg_params=list(rot=90)))
grid.newpage()
grid.table(head(mtcars), theme=tt)

Output

enter image description here

Upvotes: 1

Related Questions