Несколько строк с разным стилем в заголовке как в html, так и в docx – flextable ⇐ Html

[Anonymous]

Мне нужно отобразить заголовок данных, имя компьютера и точку в заголовке таблицы.У меня также есть требования: тема «зебра», объединение ячеек при необходимости. Вот почему я выбрал гибкую таблицу.
Вот мой код:

Код: Выделить всё

library(officer) # border settings library
library(flextable) # drawing tables library

library(dplyr)

Caption %
set_table_properties(width = 1, layout = "autofit") %>%
hline(part="all", border = std_border ) %>%
vline(part="all", border = std_border ) %>%
border_outer( border = bold_border, part = "all" ) %>%
fix_border_issues() %>%
set_header_labels(
values = list(Instance = InstanceName ) ) %>%
flextable::font (part = "all" , fontname = "Calibri")

save_as_docx( table, path =  file.path("c:\\temp", "test01.docx") )
save_as_html (table, path = file.path("c:\\temp", "test01.html"))

Вот что я получил в формате html, который меня устраивает:


Но в формате docx мой стиль заголовка не применяется:


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

Подробнее здесь: https://stackoverflow.com/questions/680 ... -flextable