Использование аннотации для добавления разных аннотаций к разным фасетам

Я пытаюсь добавить метки панели к разным фасетам на графике. Я хочу, чтобы они были 1: 7, но следующий код

d <- ggplot(diamonds, aes(carat, price, fill = ..density..)) +
     xlim(0, 2) + stat_binhex(na.rm = TRUE) + opts(aspect.ratio = 1)

d1<-d + facet_wrap(~ color)

d1+annotate("text", x=0.25, y=1.5e+04, label=1:7)

доходность

Error: When _setting_ aesthetics, they may only take one value. Problems: label

Теперь я могу указать одно значение и воспроизвести его по всем аспектам. Но как я могу иметь разные метки в разных фасетах, используя annotate ()?

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

Решение Вопроса

Сannotate, вы не можете & t. Но, установивdata.frame и используя его в качестве источника данных дляgeom_text, это легко (с несколькими аспектами бухгалтерского учета).

d1 + geom_text(data=data.frame(x=0.25, y=1.5e+04, label=1:7, 
                               color=c("D","E","F","G","H","I","J")), 
               aes(x,y,label=label), inherit.aes=FALSE)

enter image description here

 04 окт. 2018 г., 13:23
Если вы хотите добавить текст в несколько строк, убедитесь, что вашcolnames() в текстеdata.frame сопоставьте те данные, которые вы собираетесь построить.

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