r - 保持 {ggimage} 中的原始图像比例

Question

我正在尝试在{ggimage}图层中使用非平方图像，但我似乎无法使比例适合原始图像比例。文档指出了这个asp论点，但这似乎不起作用。

这是一个明显的非方形图像：https ://ps.w.org/insert-headers-and-footers/assets/banner-772x250.png

以下是结果{ggimage}：

library(ggimage)
library(ggplot2)
d <- data.frame(
  x = 1,
  y = 1,
  image = "https://ps.w.org/insert-headers-and-footers/assets/banner-772x250.png"
)

ggplot(d, aes(x, y)) + 
  geom_image(aes(image=image), size = 1)

ggplot(d, aes(x, y)) + 
  geom_image(aes(image=image), size = 1, asp = 0.1)

ggplot(d, aes(x, y)) + 
  geom_image(aes(image=image), size = 1, asp = 0.5)

ggplot(d, aes(x, y)) + 
  geom_image(aes(image=image), size = 1, asp = 0.9)

如何使图像保持原始的宽高比？