Print openxml, latex or html code of a flextable. The function is particularly useful when you want to generate flextable in a loop from a R Markdown document.

Inside R Markdown document, chunk option results must be set to 'asis'.

All arguments whose name starts with ft. can be set in the chunk options.

See knit_print.flextable for more details.

flextable_to_rmd(
  x,
  ft.align = opts_current$get("ft.align"),
  ft.split = opts_current$get("ft.split"),
  ft.tabcolsep = opts_current$get("ft.tabcolsep"),
  ft.arraystretch = opts_current$get("ft.arraystretch"),
  ft.left = opts_current$get("ft.left"),
  ft.top = opts_current$get("ft.top"),
  text_after = "",
  webshot = opts_current$get("webshot"),
  bookdown = FALSE,
  pandoc2 = TRUE,
  print = TRUE
)

Arguments

x

a flextable object

ft.align

flextable alignment, supported values are 'left', 'center' and 'right'.

ft.split

Word option 'Allow row to break across pages' can be activated when TRUE.

ft.tabcolsep

space between the text and the left/right border of its containing cell, the default value is 8 points.

ft.arraystretch

height of each row relative to its default height, the default value is 1.5.

ft.left, ft.top

Position should be defined with options ft.left and ft.top. Theses are the top left coordinates in inches of the placeholder that will contain the table. Their default values are 1 and 2 inches.

text_after

The string you put here will be added after printing the content of the flextable. For example, you can put "\\pagebreak" here to have tables produced with page breaks.

webshot

webshot package as a scalar character, one of "webshot" or "webshot2".

bookdown

TRUE or FALSE (default) to support cross referencing with bookdown.

pandoc2

TRUE (default) or FALSE to get the string in a pandoc raw HTML attribute (only valid when pandoc version is >= 2.

print

print output if TRUE

See also

Examples

demo_loop <- system.file(package = "flextable", "examples/rmd", "loop_with_flextable.Rmd") rmd_file <- tempfile(fileext = ".Rmd") file.copy(demo_loop, to = rmd_file, overwrite = TRUE)
#> [1] TRUE
rmd_file # R Markdown document used for demo
#> [1] "/tmp/Rtmpl4ubD7/file5fe56025a89.Rmd"
if(require("rmarkdown", quietly = TRUE)){ # render(input = rmd_file, output_format = "word_document", # output_file = "loop_with_flextable.docx") # render(input = rmd_file, output_format = "html_document", # output_file = "loop_with_flextable.html") # render(input = rmd_file, # output_format = rmarkdown::pdf_document(latex_engine = "xelatex"), # output_file = "loop_with_flextable.pdf") }
#> NULL