r语言 - 如何从官员中删除docx开头的空行

Question

我正在使用officer R来创建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

要删除段落，需要使用函数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")