library(locatexec)
if (exec_available('word')) {
file <- system.file(package = "doconv",
"doc-examples/example.docx")
docx_out <- tempfile(fileext = ".docx")
file.copy(file, docx_out)
docx_update(input = docx_out)
}
Run the code above in your browser using DataLab