My R Script принимает вводимые пользователем данные (file.choose ()), затем спрашивает, какой каталог / имя файла пользователь хочет сохранить (проверяет расширение, добавляет, если пользователь его забыл).
Затем цель состоит в том, чтобы применить форматирование: закрепить панели (верхняя строка) Цвет (заливка / текст) верхняя строка Формат как выравнивание таблицы (центр / центр)
header_style <- createStyle(fontColour = "#ffffff"
, fgFill = "#c8102e"
, halign = "center"
, valign = "center"
, textDecoration = "Bold"
, border = "TopBottomLeftRight")
write.xlsx(data
, file = output_file
, asTable = TRUE
, headerStyle = header_style
, gridLines = FALSE
, freezeFirstRow = TRUE
, colWidths = "auto"
, tableStyle = "TableStyleLight9"
)
Это работает (в основном), но у меня есть проблема, как для изменения цвета таблицы (по умолчанию синий). Я предпочитаю White Medium 4 (выше - всего лишь пример), но не могу понять, как этого добиться. Думал, возможно, l oop через и раскрасить ячейки на основе mod 2 logi c, но подумал, что это может привести к однократному форматированию, и если пользователи добавляют / удаляют строки et c, это не будет динамическим c. Я немного использовал VBA в прошлом и, возможно, мог бы go таким образом, не уверен в интерактивности между R и VBA (надеясь избежать VBA, но при необходимости будет go этот маршрут). Приветствуются любые советы.