knitr::opts_chunk$set(echo = F,message = F,warning = F,error=T,include = T,cache=F,fig.align="center",
                      fig.width = 10, fig.height=8, dpi = 300, out.width = ifelse(oFormat=="pdf","480pt","800px"))

# isDocx = T #use flextable regardless of the output format
isDocx = (oFormat!="html")
library(wfr)
sharedLibs <-c("knitr","pander","xtable","magrittr","flextable","officer","openxlsx")
extraLibs = `if`(isDocx,c("captioner","stringr"),c("kableExtra"))
loadLibs(c(sharedLibs,extraLibs))

r if(!isDocx) setHtmlHeaderProperty()



blueskypie/wfr documentation built on Feb. 6, 2024, 4:38 p.m.