Apply alafoli theme
a flextable object
Theme functions are not like 'ggplot2' themes. They are applied to the existing table immediately. If you add a row in the footer, the new row is not formatted with the theme. The theme function applies the theme only to existing elements when the function is called.
That is why theme functions should be applied after all elements of the table have been added (mainly additionnal header or footer rows).
If you want to automatically apply a theme function to each flextable,
you can use the
theme_fun argument of
aware that this theme function is applied as the last instruction when
flextable() - so if you add headers or footers to the array,
they will not be formatted with the theme.
You can also use the
post_process_pptx) to specify a theme
to be applied systematically before the
flextable() is printed;
in this case, don't forget to take care that the theme doesn't
override any formatting done before the print statement.
ft <- flextable(head(airquality)) ft <- theme_alafoli(ft) ft #> a flextable object. #> col_keys: `Ozone`, `Solar.R`, `Wind`, `Temp`, `Month`, `Day` #> header has 1 row(s) #> body has 6 row(s) #> original dataset sample: #> Ozone Solar.R Wind Temp Month Day #> 1 41 190 7.4 67 5 1 #> 2 36 118 8.0 72 5 2 #> 3 12 149 12.6 74 5 3 #> 4 18 313 11.5 62 5 4 #> 5 NA NA 14.3 56 5 5