decrease font size for each cell incrementally until it fits a given max_width.
fit_to_width(x, max_width, inc = 1L, max_iter = 20)
flextable object
maximum width to fit in inches
the font size decrease for each step
maximum iterations
Other flextable dimensions:
autofit()
,
dim.flextable()
,
dim_pretty()
,
flextable_dim()
,
height()
,
hrule()
,
ncol_keys()
,
nrow_part()
,
set_table_properties()
,
width()
# NOT RUN {
ft_1 <- qflextable(head(mtcars))
ft_1 <- width(ft_1, width = 1)
ft_1
ft_2 <- fit_to_width(ft_1, max_width = 4)
ft_2
# }
Run the code above in your browser using DataLab