if (FALSE) { # rlang::is_installed("flextable") && getRversion() >= "4.5"
brand <- as_brand_yml('
color:
palette:
black: "#1A1A1A"
white: "#F9F9F9"
orange: "#FF6F20"
foreground: black
background: white
primary: orange')
library(flextable)
theme_brand_flextable(
flextable(head(palmerpenguins::penguins)),
brand
)
}
if (FALSE) { # rlang::is_installed("flextable") && getRversion() < "4.5"
brand <- as_brand_yml('
color:
palette:
black: "#1A1A1A"
white: "#F9F9F9"
orange: "#FF6F20"
foreground: black
background: white
primary: orange')
library(flextable)
theme_brand_flextable(
flextable(head(mtcars)),
brand
)
}
Run the code above in your browser using DataLab