# NOT RUN {
# Create a new document
doc = docx( title = "title" )
text = pot( value = "Hello Word"
, format = textProperties(color="red"
, font.size = 12
, font.weight = "bold"
, font.style = "italic"
, underlined = TRUE
, font.family = "Courier New"
)
) + " is rich"
doc <- addParagraph(doc, set_of_paragraphs(text), "Normal");
writeDoc( doc, "Hello_Word.docx" )
# }
Run the code above in your browser using DataLab