Write a function that wraps around whatever you're using to create the tables.
library(dplyr)
report_table <- function(dataset, ...) {
dataset %>%
mutate_if(is.numeric, format, big.mark = ".") %>%
make_table(...) # Or whatever function you've been using, like kable
}