Запись значений столбцов в электронную таблицу Excel в формате R с форматированием

Question

Я пытаюсь использовать пакет xlsx для чтения в стиле (форматировании) шаблона, а затем выписывать данные из фреймворка данных в файл .xlsx с тем же форматирование. Я следую ближайшему примеру, который я могу найти в Wiki пакета.

Проблема заключается в том, что при попытке записи данных из моей фреймворка данных он проходит через NULL, хотя класс столбца, который я пытаюсь написать, соответствует примеру в Wiki, как и мой синтаксис.

head(fer_sheet1[,1]) 

# [1] "HXXX3691X" "HXXX3789X" "HXXX3759X" "HXXX37350" "HXXX3722X" "HXXX3719X" 

class(fer_sheet1[,1]) 

# [1] "character" 

Final_Report_Formatted <- createWorkbook() 
Contact_List <- createSheet(Final_Report_Formatted, "Contact List") 
Contact_List_rows <- createRow(Contact_List, rowIndex = 1:43) 
Contact_List_cells <- createCell(Contact_List_rows, 
           colIndex=1:length(fer_sheet1)) 
mapply(setCellValue, Contact_List_cells[1:43, 1], fer_sheet1[, 1]) 

# $`1` 
# NULL 
# 
# $`2` 
# NULL 
# 
# $`3` 
# NULL 

и так далее, вплоть до:

# $`41` 
# NULL 
# 
# $`42` 
# NULL 
# 
# $`43` 
# NULL 

я мог бы легко сделать это без пакета xlsx, но идея состоит в том, чтобы идти вперед и использовать их пакет, так что я могу применить форматирование из учебника шаблонов после заполнения его данными.

Интересно, что я вернусь NULL значения с помощью встроенного в month.name данных, как в примере:

mapply(setCellValue, Contact_List_cells[1:12, 1], month.name) 

Answer 1

Я не вижу близко/сохранить команду рабочей книги. Как правило, такая операция похожа на запись графического графика в файл ... ему нужна функция завершения. В этом случае это будет:

saveWorkbook(Final_Report_Formatted, "myChosenWBName.xlsx")