My tables are produced by knitr and kableExtra (kable and kable_styling). Some example code:
tabOut <- kable(m.HouseVal,
col.names = names_spaced,
align=c("lrrrrr"),
caption="Comparison of Housing Values", row.names=FALSE,
format="latex", booktabs=TRUE) %>%
kable_styling() %>%
row_spec(0, align = "c") %>%
row_spec(0, align = "c") %>%
row_spec(1, bold = TRUE, italic = TRUE) %>%
row_spec(4, bold = TRUE, italic = TRUE) %>%
column_spec(1, width = "3in",bold = T) %>%
column_spec(2, width = "0.5in") %>%
column_spec(3, width ="0.6in") %>%
column_spec(4, width ="0.6in") %>%
column_spec(5, width ="0.6in") %>%
column_spec(6, width ="0.6in") %>%
add_header_above(header=tblHead1) %>%
add_footnote(captionSrc("ACS",ACS))
Some of this code is internal functions, but this provides a sense of what's going on.
Cheers--
AB