AddDataFrame附加到具有数据的现有工作表时出错

Question

我正在尝试将数据框中的行与Excel工作簿中的数据附加到现有工作表中。我所见过的有关addDataFrame的所有文档/支持都始于创建新表。调整为使用现有工作表时，会出现错误。

下面是我在代码中创建新工作表的代码，如文档中所述。这可以正常工作。

wb = loadWorkbook(file = paste(dir,"test.xlsx",sep = ""))
sheet = createSheet(wb, sheetName = paste(as.character(year(Sys.Date())),"test"))
addDataFrame(x = new_data,sheet = sheet)
saveWorkbook(wb,file = paste(dir,"test.xlsx",sep = ""))

这是我要添加到现有工作表中的调整。

wb = loadWorkbook(file = paste(dir,"test.xlsx",sep = ""))
sheets = getSheets(wb)
sheet = sheets[as.character(year(Sys.Date()))]
addDataFrame(x = new_data, sheet = sheet,startRow = 16)

当我尝试写入现有工作表时，出现此错误：

Error in sheet$getWorkbook() : attempt to apply non-function