Нужна помощь по библиотеке R XLConnect

Я пытаюсь скопировать графики и диаграммы из кода R в файл в формате Excel с помощью XLConnect. Я получаю сообщение об ошибке "Ошибка: IllegalArgumentException (Java): имя "Report2" не существует!" в котором говорится, что вкладка "Отчет2" не существует. Однако я создал вкладку в коде, используя: "XLConnect::createSheet(wb, name = "Report2")"

Когда я могу скопировать текст и таблицы из R на вкладку «Отчет2», но не могу скопировать диаграммы на ту же вкладку, почему я не могу копировать графики/диаграммы на той же вкладке.

wb <- loadWorkbook("Data Quality Report2.xls", create = TRUE)
XLConnect::createSheet(wb, name = "Report2")
require(lattice)
png(filename = "earthquake.png", width = 800, height = 600)
devAskNewPage(ask = FALSE)
Depth <- equal.count(quakes$depth, number=8, overlap=.1)
xyplot(lat ~ long | Depth, data = quakes)
update(trellis.last.object(),
       strip = strip.custom(strip.names = TRUE, strip.levels = TRUE),
       par.strip.text = list(cex = 0.75),
       aspect = "iso")
dev.off()

addImage(wb, filename = "earthquake.png", name = "Report2",originalSize = TRUE)