Annotate .png фигуры в geom_boxplot, когда ось X является дискретной переменной

Question

Я хотел бы аннотировать маленькие цифры .png на графике geom_box в ggplot.Например, используйте набор данных:

diam <- dplyr::select(diamonds, cut, price)
ggplot(diam, aes(x= cut, y= price, color= cut))+
  geom_boxplot()

Итак, вопросы:
1) как я могу загрузить цифры из моеголокальный файл;
2) как определить положение этих пяти цифр, когда ось x является дискретной переменной.
Спасибо.