# NOT RUN {
# Use `exibble` to create a gt table;
# use the `pct()` helper to define the
# font size for the column labels
tab_1 <-
  exibble %>%
  gt() %>%
  tab_style(
    style = cell_text(size = pct(75)),
    locations = cells_column_labels(columns = TRUE)
  )
# }
Run the code above in your browser using DataLab