# Table of 6 columns
ft_car <- flextable(head(mtcars)[, 2:7])
# All 6 columns right aligned
align(ft_car, align = "right", part = "all")
# Manually specify alignment of each column
align(
ft_car,
align = c("left", "right", "left", "center", "center", "right"),
part = "all")
# Center-align column 2 and left-align column 5
align(ft_car, j = c(2, 5), align = c("center", "left"), part = "all")
# Alternate left and center alignment across columns 1-4 for header only
align(ft_car, j = 1:4, align = c("left", "center"), part = "header")
ftab <- flextable(mtcars)
ftab <- align_text_col(ftab, align = "left")
ftab <- align_nottext_col(ftab, align = "right")
ftab
Run the code above in your browser using DataLab