## Not run:
# wdGet()
# wdTitle("Title")
# wdWrite("This is in normal font")
# wdSetFont(fontname="Garamond",fontsize=14,bold=TRUE,italic=TRUE)
# wdWrite("This is in 14pt Garamond")
# wdNormal("This switches back to Normal")
# ## End(Not run)
Run the code above in your browser using DataLab