# NOT RUN {
doc = docx( title = "My example" )
styles( doc )
# [1] "Normal" "Title1" "Title2"
# [4] "Title3" "Title4" "Title5"
# [7] "Title6" "Title7" "Title8"
#[10] "Title9" "Defaut" ...
doc = declareTitlesStyles(doc
, stylenames = c("Title1", "Title2", "Title3"
, "Title4", "Title5", "Title6", "Title7", "Title8", "Title9" ) )
doc = addTitle( doc, "title 1", 1 )
# }
Run the code above in your browser using DataLab