tableHTML(mtcars) %>%
add_css_thead(css = list('background-color', 'lightgray'))
tableHTML(mtcars) %>%
add_css_thead(css = list('background-color', 'lightgray')) %>%
add_css_thead(css = list('background-color', 'lightblue'))
tableHTML(mtcars) %>%
add_css_thead(css = list('background-color', 'lightgray')) %>%
add_css_thead(css = list('text-align', 'center'))
Run the code above in your browser using DataLab