0

我正在尝试使用该包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,但我的想法是继续使用他们的包,以便我可以在填充数据后应用模板工作簿中的格式。

有趣的是,我还使用内置month.name数据返回 NULL 值,如示例中所示:

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

1 回答 1

1

我没有看到任何关闭/保存工作簿命令。通常这种操作就像将图形写入文件......它需要一个完成功能。在这种情况下,这将是:

saveWorkbook(Final_Report_Formatted, "myChosenWBName.xlsx")
于 2014-06-11T16:27:51.067 回答