Você tem que usar o
scale_down opção de kableExtra. O scale_down opção vai caber sua tabela em uma página quando ela for muito larga. A fonte da polícia também será reduzida. Aqui está um exemplo do código que você pode usar:
kable(your_dt, "latex", booktabs = T) %>%
kable_styling(latex_options = c("striped", "scale_down"))
