[英]I am facing error in pasting an image in Excel from R using package openxlsx
我正在嘗試使用 R 包 openxlsx 將保存在我的文件夾中的圖像粘貼到 Excel。 我已經完全研究了包文檔並按照文檔中給出的步驟進行操作。 但即使是包中給出的例子也不適合我
## 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)
這是包文檔中給出的示例。 我使用的是我的“.jpg”文件,而不是“einstein.jpg”。 我正在嘗試將該圖像粘貼到我的工作簿“wb”中。 函數“system.file”不獲取我傳遞的圖像。 我已經確定圖像是否已存儲,沒有與路徑相關的問題。
任何人都可以幫助我使用此功能或有任何經過驗證的替代方案嗎?
您不應使用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)
對於上下文,您可能會在此處逐步瀏覽 openxlsx 的文檔:ycphs.github.io/openxlsx/articles/Introduction.html
鏈接上的圖像鏈接不正確。 你應該使用:
img <- readJPEG(file.path(path.package("openxlsx"), "extdata/einstein.jpg"))
嘗試這樣的事情:
library(jpeg)
img<-readJPEG("einstein.jpg")
plotFn(img)
insertPlot(wb, 1)
saveWorkbook(wb, "insertImageExample.xlsx", overwrite = TRUE)
file.show("insertImageExample.xlsx")
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.