如何添加换行符？

Question

我尝试使用body_replace_all_text或body_add_par添加换行符但却没有任何乐趣。使用\r\n可以在OSX TextEdit中正确显示，但不能在Word中显示。

一个例子：

library(officer)
library(tidyverse)

read_docx() %>% 
  body_add_par("Oneline\r\n\r\nAnother line") %>% 
  print(target = "example.docx")

有没有正确的方法呢？

Answer 1

每次要添加段落时，都必须调用body_add_par（文本段落以新行结尾）：

library(officer)
library(tidyverse)

read_docx() %>% 
  body_add_par("Oneline") %>% 
  body_add_par("Another line") %>% 
  print(target = "example.docx")

Answer 2

我找到的另一种方法是在Word中修改。

library(officer)
library(tidyverse)

read_docx() %>% 
  body_add_par("Oneline(LineBreak)Another line") %>% 
  print(target = "example.docx")

然后在Word中，按Ctrl + H并将所有“（LineBreak）”更改为“^ p”。

这不是一个奇特的想法，但它对我来说是一个乐队援助解决方案。