Я сталкиваюсь с ошибкой при вставке изображения в Excel из R с использованием пакета openxlsx - PullRequest
Новая
       14

Я сталкиваюсь с ошибкой при вставке изображения в Excel из R с использованием пакета openxlsx

0 голосов
/ 25 апреля 2019

Я пытаюсь вставить изображение, сохраненное в моей папке, в Excel, используя пакет R openxlsx. Я полностью изучил документацию к пакету и следовал инструкциям, приведенным в документации. Но даже пример, приведенный в пакете, не работает для меня 

## Create a new workbook
wb <- createWorkbook("Ayanami")
## Add some worksheets
addWorksheet(wb, "Sheet 1")
addWorksheet(wb, "Sheet 2")
addWorksheet(wb, "Sheet 3")
## Insert images
img <- system.file("einstein.jpg", package = "openxlsx")
insertImage(wb, "Sheet 1", img, startRow = 5, startCol = 3, width = 6, height = 5)
insertImage(wb, 2, img, startRow = 2, startCol = 2)
insertImage(wb, 3 , img, width = 15, height = 12, startRow = 3, startCol = "G", units = "cm")
## Save workbook
saveWorkbook(wb, "insertImageExample.xlsx", overwrite = TRUE)

Это пример, приведенный в документации к пакету. Вместо "einstein.jpg" я использую мой файл ".jpg". Я пытаюсь вставить это изображение в мою книгу "wb". Функция "system.file" не получает изображение, которое я передаю. Я удостоверился, что нет никаких проблем, связанных с путем, было ли изображение сохранено.

Может ли кто-нибудь помочь мне с этой функцией или есть проверенная альтернатива?

1 Ответ

0 голосов
/ 29 апреля 2019

Не следует использовать функцию system.file, поскольку изображение, которое вы пытаетесь вставить в книгу, не является системным файлом.

вместо этого вам понадобится что-то вроде: 

img <- "C:/your_dir/your_filename.jpg"

insertImage(wb, "Sheet 1", img, startRow = 5, startCol = 3, width = 6, height = 5)
saveWorkbook(wb, "insertImageExample2.xlsx", overwrite = TRUE)
...