# NOT RUN {
library(magrittr)
x <- read_docx() %>%
body_add_par("Hello ", style = "Normal") %>%
slip_in_text("world", style = "strong") %>%
slip_in_text("Message is", style = "strong", pos = "before")
print(x, target = tempfile(fileext = ".docx"))
# }
Run the code above in your browser using DataLab