r-使用readPNG读取由Magick创建的经过编辑的png文件时出错

Question

我正在尝试使用readPNG读取我在使用magick包后创建的png文件。这是一个png文件，我使用Magick包将两个图像组合在一起。我需要使用readPNG将其作为光栅文件读取，以便以后可以使用annstate_custom将其插入到地图中。但我收到一条错误信息，上面写着：

文件不是PNG格式的

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)

我错过什么了吗？或者我有什么变通办法可以实现我的目标吗？提前谢谢！

Answer 1

您假设Magick知道您想将文件保存为png，因为您使用了".png"文件扩展名，但实际上您需要指定它：

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

现在，您应该能够将logo作为三维数组进行访问。

不幸的是，如果没有原始文件，我无法使其可复制。