# NOT RUN {
x <- read_docx()
x <- set_doc_properties(x, title = "title",
subject = "document subject", creator = "Me me me",
description = "this document is empty",
created = Sys.time())
x <- doc_properties(x)
# }
Run the code above in your browser using DataLab