Apply theme tron to a flextable
theme_booktabs(x)
x
a flextable object
ft <- flextable(iris) ft <- theme_booktabs(ft)