Заполнение баров в барплоте текстилем в ggplot2 [копия]

На этот вопрос уже есть ответ здесь:

Как добавить текстуру для заливки цветов в ggplot2? 5 ответов
test <- data.frame(a=c(1,2,3,4), b=c(4,4,4,4))
ggplot(test, aes(x=a, y=b, fill=factor(a)))+geom_bar(stat='identity')

но я также хочу добавить текст в этот сюжет, что-то вроде:

большое спасибо

Ответы на вопрос(1)

Ваш ответ на вопрос