r - 是否可以将自定义形状（来自 png）添加到 ggplot 图例？

Question

我想知道是否可以将形状添加到ggimage(). 我发现了类似的问题，但他们要么有 1）在图例中具有不同颜色的相同图片，要么 2）相同的图片不同颜色。我使用此链接将图像添加到具有颜色的图例中，但我无法弄清楚如何编辑它，以便图像会有所不同。我试过这个，但我不够先进，无法调整代码以适应我的情况

d <- data.frame(x = rnorm(10),
                y = rnorm(10),
                image = sample(c("https://www.r-project.org/logo/Rlogo.png",
                                 "https://jeroenooms.github.io/images/frink.png"),
                               size=10, replace = TRUE)
)

ggplot(d, aes(x, y)) + geom_image(aes(image=image, color=image), size=.05)

Answer 1

通过使用解决ggdraw： p2osggplot()我在行中绘制图像的对象（坐标 x=2，y = c(1,2) ）并添加文本（坐标 x=2.5，y=c(1,2)）

ggdraw() +
  draw_plot(p1) +
  draw_plot(p2, x = 0.55, y = 0.6)

然后我只是玩弄 p2 的位置，并将 xlim 和 ylim 添加到 p2 以使文本和图像在一起