# NOT RUN {
ht <- huxtable(a = 1:5, b = 5:1)
set_bold(ht, 2:4, 1:2, TRUE)
set_bold(ht, odds, evens, TRUE)
set_bold(ht, everywhere, tidyselect::matches('[aeiou]'), TRUE)
set_bold(ht, where(ht == 1), TRUE)
set_text_color(ht, 2:3, 1:2, c('red', 'blue'))
set_text_color(ht, 2:3, 1:2, c('red', 'blue'), byrow = TRUE)
# }
Run the code above in your browser using DataLab