## Not run: # Windows-specific example
#
# wrd <- GetNewWrd()
#
# for(i in seq(10, 24, 2))
# ToWrd(gettextf("This is Arial size
#
# for(i in seq(10, 24, 2))
# ToWrd(gettextf("This is Times size
# ## End(Not run)
Run the code above in your browser using DataLab