Skip to contents

Make blank columns transparent

Source: R/styles.R
empty_blanks.Rd

Blank columns are set as transparent. This is a shortcut function that deletes top and bottom borders, changes the background color to transparent, displays empty content, and sets blank column widths.

Usage

empty_blanks(x, width = 0.05, unit = "in", part = "all")

Arguments

x

a 'flextable' object, see flextable-package to learn how to create 'flextable' object.

width

width of blank columns (.1 inch by default).

unit

unit for width, one of "in", "cm", "mm".

part

part selector, see section Part selection with the part parameter in <Selectors in flextable>. Value 'all' can be used.

See also

Other sugar functions for table style: align(), bg(), bold(), color(), font(), fontsize(), highlight(), italic(), keep_with_next(), line_spacing(), padding(), rotate(), style(), tab_settings(), valign()

Examples

typology <- data.frame(
  col_keys = c(
    "Sepal.Length", "Sepal.Width", "Petal.Length",
    "Petal.Width", "Species"
  ),
  what = c("Sepal", "Sepal", "Petal", "Petal", " "),
  measure = c("Length", "Width", "Length", "Width", "Species"),
  stringsAsFactors = FALSE
)
typology
#>       col_keys  what measure
#> 1 Sepal.Length Sepal  Length
#> 2  Sepal.Width Sepal   Width
#> 3 Petal.Length Petal  Length
#> 4  Petal.Width Petal   Width
#> 5      Species       Species

ftab <- flextable(head(iris), col_keys = c(
  "Species",
  "break1", "Sepal.Length", "Sepal.Width",
  "break2", "Petal.Length", "Petal.Width"
))
ftab <- set_header_df(ftab, mapping = typology, key = "col_keys")
ftab <- merge_h(ftab, part = "header")
ftab <- theme_vanilla(ftab)
ftab <- empty_blanks(ftab)
ftab <- width(ftab, j = c(2, 5), width = .1)
ftab

 
Sepal
Petal
Species
Length
Width
Length
Width
setosa
5.1
3.5
1.4
0.2
setosa
4.9
3.0
1.4
0.2
setosa
4.7
3.2
1.3
0.2
setosa
4.6
3.1
1.5
0.2
setosa
5.0
3.6
1.4
0.2
setosa
5.4
3.9
1.7
0.4