Добавление таблиц без заголовков столбцов в Officer

Question

Попытка добавить таблицу из фрейма данных в документ.docx с использованием офицера, но без включения строки для заголовка столбца. Я попытался удалить имена столбцов из фрейма данных перед добавлением его в документ, но это не сработало и привело к тому, что в верхний ряд добавлялись сумасшедшие, а верхний ряд просто не существовал. Есть идеи, как этого добиться?

NarrativeDoc <- read_docx()
tmp = data.frame(RowHead1=c('Fact 1','Fact 2'),
                 RowHead2=c("I like chicken","I am not a chicken"),
                 stringsAsFactors =FALSE)
names(tmp)=NULL
NarrativeDoc <- body_add_table(NarrativeDoc,tmp)
print(NarrativeDoc,
      target="C:\\Users\\jclark_v\\Documents\\R\\TestNoHeader.docx")

Answer 1

Я добавил заголовок аргумента в body_add_table (вам нужно будет обновить с github)

NarrativeDoc <- read_docx()
tmp = data.frame(RowHead1=c('Fact 1','Fact 2'),
                 RowHead2=c("I like chicken","I am not a chicken"),
                 stringsAsFactors =FALSE)
NarrativeDoc <- body_add_table(NarrativeDoc,tmp, header = FALSE)
NarrativeDoc <- body_add_par(NarrativeDoc, "")
NarrativeDoc <- body_add_table(NarrativeDoc,tmp, header = TRUE)
print(NarrativeDoc,
      target="TestNoHeader.docx")