使用 readPNG 读取由 Magick 创建的已编辑 png 文件时出错

Error in Using readPNG to read an edited png file created by Magick

我正在尝试使用 readPNG 读取 file I created after using the 包。这是我使用 Magick 包从两个图像组合而成的 png 文件。我需要使用 readPNG 将其作为光栅文件读取,以便稍后可以使用 annotate_custom 将其插入到地图中。但我收到一条错误消息:

file is not in PNG format

A <- image_read("Alogo.jpg")
image_trim(A)
A_twick<-image_resize(A, "130x130")
print(A_twick)

B <- image_read("Blogo.jpg")
image_trim(B)

combined<-image_append(c(B,A))
print(combined)
image_write(combined, "combinedlogo.png")

logo <- readPNG("logo/combinedlogo.png")
# here is the error message "Error in readPNG("logo/combinedlogo.png") : file is not in PNG format"

RI2<-RI+ annotation_custom(combined, xmin=-71.92, xmax=-71.82, ymin=41.15, ymax=41.23)

我错过了什么吗?或者我可以采取任何解决方法来实现我的目标吗?提前致谢!

你假设 Magick 知道你想将你的文件保存为 png,因为你使用了“.png”文件扩展名,但你实际上需要指定它:

magick::image_write(combined, "combinedlogo.png", format = "PNG")
logo <- png::readPNG("logo/combinedlogo.png")

您现在应该能够以 3 维数组的形式访问 logo

不幸的是,如果没有原始文件,我无法重现此内容。