r - 如何将图像设置为R中极坐标中条形图的标签

Question

简单的概念，出乎意料的混乱。我有一个这样的图表：

我想做的是用小图像替换字母（实际上是绘画；所以一幅画代表“a”，另一幅画代表“b”，依此类推）。

相关代码：

mydata <- read.xlsx("C:/...", 1)
plotdata = mydata[1:22,1:2]

v1 = plotdata[1:22, 1]  # categorical labels which we can hopefully replace with images
v2 = plotdata[1:22, 2]

distance_plot <- ggplot(plotdata, aes(x = v1, y = v2)) +
  geom_bar(stat = "identity", position = "dodge") + 
  xlab("") + ylab("") +
  theme(axis.ticks = element_blank(), axis.text.y = element_blank(), 
        panel.background = element_blank(), panel.grid.major.x = element_line(colour="grey"),
        axis.text.x = element_text(size = 20), legend.title=element_blank())

distance_plot + coord_polar(theta = "x")

自定义注释不适用于极坐标。:(我也尝试过绘制一个值（只是作为概念证明/看看我是否可以让它工作）x值是一个图像，但这给出了以下错误：

Error: Aesthetics must be either length 1 or the same as the data (1): x

奖励 Q（但不太重要）：如何将每个 y 值插入当前指向每个标签的行的顶部，或每个标签的上方等？

我也是 R 新手，所以请对任何不太理想的代码持保留态度。:)

标签： rggplot2polar-coordinates