powered by
wdTitle(title, label = substring(gsub("[, .]", "_", paste("text", title, sep = "_")), 1, 16), paragraph = TRUE, wdapp = .R2wd)
wdGet() wdTitle("Title") wdSection("Section 1",newpage=TRUE) wdSubsection("Sub-section 1.1") wdSubsubsection("Sub-sub-section 1.1.a")
Run the code above in your browser using DataLab