When used in a loop, calls to blocks do not generate
output because knit_print
method is not called.
Use the function to force printing. Also you should tell the chunk
to use results 'as-is' (by adding results='asis'
to your chunk header).
knit_print_block(x, ...)
a block object, result of a block function from officer package
unused arguments
None. the function only print XML code.
Other functions that force printing:
knit_print_run()
library(rmarkdown)
rmd_file_src <- system.file(
package = "officedown", "examples", "word_loop.Rmd")
rmd_file_des <- tempfile(fileext = ".Rmd")
if(pandoc_available()){
file.copy(rmd_file_src, to = rmd_file_des)
docx_file_1 <- tempfile(fileext = ".docx")
render(rmd_file_des, output_file = docx_file_1, quiet = TRUE)
if(file.exists(docx_file_1)){
message("file ", docx_file_1, " has been written.")
}
}
#> file /tmp/Rtmpod7n2k/file236c57b4a9c2.docx has been written.