r - 如何从官员删除docx开头的空白行

Question

我正在使用officerforR创建一个 Word (docx) 文档。这是代码：

library(officer)
library(magrittr)

my_docx = read_docx() %>% 
  # cursor_begin() %<>% 
  body_add_par("Hello here is a test sentence to see if there is a blank line above it.", style = "Normal") %>% 
  print(target = "test.docx")

它创建一个 docx 文档，在句子上方有一个空行。它不是在字体样式中设置的字体样式之前的间距。我没有注释cursor_begin()，但空白行仍然存在。我怎样才能摆脱这个？

任何帮助表示赞赏！

Answer 1

要删除段落，您需要使用 function body_remove()。请参阅此处的文档：https ://davidgohel.github.io/officer/articles/word.html#remove-content

library(officer)
library(magrittr)

my_docx <- read_docx() %>% 
  cursor_begin() %>% body_remove() %>% 
  body_add_par("Hello here is a test sentence to see if there is a blank line above it.", 
               style = "Normal") %>% 
  print(target = "test.docx")