# NOT RUN {
options( "ReporteRs-fontsize" = 11 )
# }
# NOT RUN {
ft_obj <- vanilla.table(mtcars)
# }
# NOT RUN {
# docx example -----
doc = docx( )
doc = addFlexTable( doc, flextable = ft_obj )
writeDoc( doc, file = "add_ft_ex.docx" )
# }
# NOT RUN {
# }
# NOT RUN {
# pptx example -----
doc = pptx( )
doc = addSlide( doc, slide.layout = "Title and Content" )
doc = addFlexTable( doc, flextable = ft_obj )
writeDoc( doc, file = "add_ft_ex.pptx" )
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab