Eu criei este enredo comggplot2:

As linhas externas precisam corresponder à escala Y (isto é, a posição Y das linhas para Texto1 deve ser 100 e 85). A única maneira de fazer isso é desenhar um gráfico em branco à direita da figura com a mesma escala do gráfico de barras e depois usar a função de anotação para desenhar as linhas. Outra abordagem é simplesmente "manualmente" desenhar as linhas comgrid.lines, no entanto as coordenadas degrid.lines não corresponderá à escala Y da parcela.

É possível desenhar de alguma forma essas linhas usando uma abordagem diferente? Eu suponho que teria que ser feito comgrid.lines. Como eu poderia passar coordenadas Y do gráfico de barras paragrid.lines?

Abaixo está o código mínimo usado para criar esta figura:

<code>library (ggplot2)
test= data.frame(
  group=c(rep(1,6), rep(2,6)),
  subgroup=c( 1,1,1,2,2,2,1,1,1,2,2,2),
  category=c( rep(1:3, 4)),
  count=c( 10,80,10,5,90,5,  10,80,10,5,90,5   )
  )

qplot(subgroup, 
      count, 
      data=test, 
      geom="bar", 
      stat="identity",
      fill =category,  
      facets =  .~ group,  width=0.9)+
      opts(legend.position="none",
           plot.margin = unit(c(0,9,2,0), "lines"))
</code>

Como posso desenhar as linhas à direita das barras?

Recentemente fiz uma pergunta sobre o desenho de texto fora da área do enredo emggplot2 e a solução foi usargt$layout egrid.draw.

Exibindo o texto abaixo da plotagem gerada pelo ggplot2

A abordagem semelhante poderia ser usada aqui? No meu entender, annotation_custom é apenas para texto e não funciona com outros elementos gráficos. obrigado