## Not run:
# wdGet()
# wdTitle("Title")
# wdWrite("This is in normal font")
# wdSetProperty(c("Font","Name"),"Garamond")
# wdSetProperty(c("Font","Size"),20)
# wdWrite("This is in 14pt Garamond")
# wdNormal("This switches back to Normal")
# ## End(Not run)
Run the code above in your browser using DataLab