Добавить разрыв строки в заголовке в ReporteRs

Question

В этом примере я хотел бы поместить разрыв строки между «Эпизодом IV» и «Новой надеждой», но \n не работает ... как я могу это сделать?

library("ReporteRs") 
deck <- pptx(title = "Star Wars Movies") 
deck <- addSlide(deck, slide.layout = "Title and Content") 
deck <- addTitle(deck, "Episode IV\nA New Hope") 
# spoiler alert 
deck <- addParagraph(deck, paste("This movie is about Luke Skywalker, Han Solo,", 
           "Obi-Wan Kenobi, and some droids who rescue", 
           "Princess Leia and blow up the Death Star.")) 
writeDoc(deck, file = "temp.pptx") 

Answer 1

Использование \r\n вместо \n только

library("ReporteRs") 
deck <- pptx(title = "Star Wars Movies") 
deck <- addSlide(deck, slide.layout = "Title and Content") 
deck <- addTitle(deck, "Episode IV\r\nA New Hope") 
# spoiler alert 
deck <- addParagraph(deck, paste("This movie is about Luke Skywalker, Han Solo,", 
           "Obi-Wan Kenobi, and some droids who rescue", 
           "Princess Leia and blow up the Death Star.")) 
writeDoc(deck, file = "temp.pptx")