The function is applying vertical borders to the left side of one or all parts of a flextable. The line is the left border of selected cells of the first column.

vline_left(x, i = NULL, border = NULL, part = "all")

Arguments

x

a flextable object

i

rows selection

border

border properties defined by a call to fp_border()

part

partname of the table (one of 'all', 'body', 'header', 'footer')

Illustrations

See also

Examples

library(officer)
std_border = fp_border(color="orange")

ft <- flextable(head(iris))
ft <- border_remove(x = ft)

# add vertical border on the left side of the table
ft <- vline_left(ft, border = std_border )
ft
#> 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