R/set_widths_flextable.R

Defines functions set_widths_flextable

set_widths_flextable <- function(x, widths){

  for (w in seq_along(widths)){
    x = x %>%
      flextable::width(j=w, width = widths[w]*inches)
  }
  return(x)
}
puigjos/PtxGenerator documentation built on May 20, 2020, 10:16 a.m.