> img_info <- image_info(imgs[1]) Error: The 'image' argument is not a magick image object.
时间: 2024-03-04 14:49:43 浏览: 249
这个错误提示意味着 `image_info()` 函数要求传入的参数必须是 magick 图像对象,而 `imgs[1]` 并不是 magick 图像对象。
你可以使用 `magick::image_read()` 函数读取第一张 PNG 图片并将其转换为 magick 图像对象,然后再将其传递给 `image_info()` 函数。以下是修改后的代码示例:
```R
library(magick)
# 读入 PNG 图片
imgs <- lapply(1:9, function(i) {
img <- image_read(paste0("E:/NorthChinaDustBreakout/z_Figure/FY4/22/", i, ".png"))
img
})
# 获取原始图片的分辨率
img_info <- image_info(image_read(paste0("E:/NorthChinaDustBreakout/z_Figure/FY4/22/", 1, ".png")))
ani.width <- img_info$width
ani.height <- img_info$height
# 合成 GIF 动画,并保存到本地
saveGIF({
for (i in 1:length(imgs)) {
print(imgs[[i]])
ani.pause(0.1)
}
}, movie.name = "E:/NorthChinaDustBreakout/z_Figure/FY4/22/output.gif", interval = 0.1, ani.width = ani.width, ani.height = ani.height)
```
请将 `magick::image_info()` 函数的第一个参数设置为第一张 PNG 图片的路径(即 `paste0("E:/NorthChinaDustBreakout/z_Figure/FY4/22/", 1, ".png")`)。
阅读全文