Word 中使用书签和官员的多个 flextables

Question

我想在 1 个 Word 文档的两个书签位置添加两个 flextables。但是，当添加第二个时，它会将第二个表格放在第一个表格的书签处，而第一个表格不在 Word 文档中。

有没有其他人遇到过这个问题并且知道如何解决它？

示例代码：

variable_1 <- c("text1", "text2", "text3") 
variable_2 <- c(23,45,23) 
variable_3 <- c("column1", "column2", "column3")

df1 = data.frame(variable_1, variable_2) 
df2 = data.frame(variable_3, variable_2)

df1_flex <- flextable(df1) 
df2_flex <- flextable(df2)

doc <- read_docx("X:/My Desktop/test_document.docx") 
doc <- cursor_begin(doc) 
doc <- cursor_forward(doc) 
print(doc, target="X:/My Desktop/test_document_bm.docx")

doc <- read_docx("X:/My Desktop/test_document_bm.docx") 
doc <- body_bookmark(doc, "tabel1") 
doc <- body_replace_flextable_at_bkm(doc, "tabel1", df1_flex) 
doc <- body_bookmark(doc, "tabel2") 
doc <- body_replace_flextable_at_bkm(doc, "tabel2", df2_flex)

docx_bookmarks(doc)

print(doc, target="X:/My Desktop/test_document_result.docx")