Texreg table does not fit on one page

Question

I have a texreg (Latex table) that won't fit on one page. How to fit in in single page?

library(tidyverse)
library(texreg)

d <- mtcars %>% mutate_at(.vars=c('vs','am','gear','carb'), .funs=factor)

lm <- lm(hp~am*gear*carb*mpg*hp,data=d)

texreg(lm,file='texfile.tex',return.string=F)

score 0 · Answer 1 · answered Jun 30 '21 at 10:47

0

A workaoround inspired by this great answer:

In the beginning of the Latex-document, write \usepackage{adjustbox}. Thereafter, change the texreg output as follows:

tr <- texreg(lm,return.string=T)

tr <- gsub("\\begin{tabular}"
           ,"\\begin{adjustbox}{totalheight=\\textheight-2\\baselineskip}\n\\begin{tabular}"
           ,tr
           ,fixed=T)

tr <- gsub("\\end{tabular}"
           ,"\\end{tabular}\n\\end{adjustbox}"
           ,tr
           ,fixed=T)

write_file(tr, 'test.tex')

Now when you write \input{test.tex} in your Latex-file, the output table will be squeezed to fit one page.

answered Jun 30 '21 at 10:47

Samuel Saari

1,023
8
13

1

From the tex perspective, it would be better to use a suitable font size instead of scaling, see https://tex.stackexchange.com/questions/425453/why-not-scale-elements-that-contain-text for more information – samcarter_is_at_topanswers.xyz Jun 30 '21 at 11:01
is there an automatized way of making sure the table fits to one page by reducing file size? Or is it trial and error? – Samuel Saari Jun 30 '21 at 11:20
Trial and error. but the result will be better – samcarter_is_at_topanswers.xyz Jun 30 '21 at 11:27

Texreg table does not fit on one page

1 Answers1