Usando anotações para adicionar anotações diferentes a diferentes facetas
Eu estou tentando adicionar rótulos de painel para diferentes facetas em um gráfico. Eu quero que eles sejam 1: 7, mas, o seguinte código
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)
rendimentos
Error: When _setting_ aesthetics, they may only take one value. Problems: label
Agora, posso fornecer um único valor e obter isso replicado em todas as facetas. Mas como posso ter rótulos diferentes em diferentes facetas usando annotate ()?