Add an header or footer new row made of one cell. This is a sugar function to be used when you need to add a title row to a flextable, most of the time it will be used in a context of adding a footnote or adding a title on the top line of the flextable.

add_header_lines(x, values = character(0), top = TRUE)

add_footer_lines(x, values = character(0), top = FALSE)

Arguments

x

a flextable object

values

a character vector, each element will be added a a new row in the header or footer part.

top

should the row be inserted at the top or the bottom.

Illustrations

See also

Examples

ft_1 <- flextable( head( iris ) ) ft_1 <- add_header_lines(ft_1, values = "blah blah") ft_1 <- add_header_lines(ft_1, values = c("blah 1", "blah 2")) ft_1 <- autofit(ft_1) ft_1
#> a flextable object. #> col_keys: `Sepal.Length`, `Sepal.Width`, `Petal.Length`, `Petal.Width`, `Species` #> header has 4 row(s) #> body has 6 row(s) #> original dataset sample: #> Sepal.Length Sepal.Width Petal.Length Petal.Width Species #> 1 5.1 3.5 1.4 0.2 setosa #> 2 4.9 3.0 1.4 0.2 setosa #> 3 4.7 3.2 1.3 0.2 setosa #> 4 4.6 3.1 1.5 0.2 setosa #> 5 5.0 3.6 1.4 0.2 setosa
ft_2 <- flextable( head( iris ) ) ft_2 <- add_footer_lines(ft_2, values = "blah blah") ft_2 <- add_footer_lines(ft_2, values = c("blah 1", "blah 2")) ft_2 <- theme_tron(ft_2) ft_2
#> a flextable object. #> col_keys: `Sepal.Length`, `Sepal.Width`, `Petal.Length`, `Petal.Width`, `Species` #> header has 1 row(s) #> body has 6 row(s) #> original dataset sample: #> Sepal.Length Sepal.Width Petal.Length Petal.Width Species #> 1 5.1 3.5 1.4 0.2 setosa #> 2 4.9 3.0 1.4 0.2 setosa #> 3 4.7 3.2 1.3 0.2 setosa #> 4 4.6 3.1 1.5 0.2 setosa #> 5 5.0 3.6 1.4 0.2 setosa