R 使用“高级职员”包装插入外部docx

R 使用“高级职员”包装插入外部docx,r,officer,R,Officer,为什么工作体不在package officer中添加docx方法?我哪里出错了 library(officer) library(magrittr) read_docx(path = "/home/user/page1.docx") %>% # load page1.docx as base document body_add_break() %>% # add page break body_add_docx(src="/home/user/page2.docx") %&

为什么工作体不在package officer中添加docx方法?我哪里出错了

library(officer)
library(magrittr)

read_docx(path = "/home/user/page1.docx") %>% # load page1.docx as base document
  body_add_break() %>% # add page break
  body_add_docx(src="/home/user/page2.docx") %>% #FIXME: This method doesn't work
  print(target = "/home/user/out.docx") # out.docx conteins only page1.docx !?
下面的代码仅适用于Windows、MS Word,并且仅适用于无分页符的情况

对于Linux、LibreOffice和google文档,它不起作用

函数体_add_docx正在使用MS Word功能。编辑文档时,文件的内容将复制到主文档中,但这仅在使用Word编辑文档时发生。LibreOffice和gdoc可能没有实现这个功能,至少我不知道它们

以下脚本仅在使用Word编辑时生成预期文档:

library(officer)
library(magrittr)

read_docx() %>% 
  body_add_par("hello world 1", style = "Normal") %>% 
  print(target = "doc1.docx")
read_docx() %>% 
  body_add_par("hello world 2", style = "Normal") %>% 
  print(target = "doc2.docx")


read_docx(path = "doc1.docx") %>%
  body_add_break() %>% 
  body_add_docx(src="doc2.docx") %>%
  print(target = "out.docx") 
library(officer)
library(magrittr)

read_docx() %>% 
  body_add_par("hello world 1", style = "Normal") %>% 
  print(target = "doc1.docx")
read_docx() %>% 
  body_add_par("hello world 2", style = "Normal") %>% 
  print(target = "doc2.docx")


read_docx(path = "doc1.docx") %>%
  body_add_break() %>% 
  body_add_docx(src="doc2.docx") %>%
  print(target = "out.docx")