Estoy tratando de hacer un gráfico de barras apiladas con etiquetas de texto, este es un ejemplo de datos / código:

library(reshape2)

ConstitutiveHet <- c(7,13)
Enhancer <- c(12,6)
FacultativeHet <- c(25,39)
LowConfidence <- c(3,4)
Promoter <- c(5,4)
Quiescent <- c(69,59)
RegPermissive <- c(23,18)
Transcribed <- c(12,11)
Bivalent <- c(6,22)
group <- c("all","GWS")

meanComb <- data.frame(ConstitutiveHet,Enhancer,LowConfidence,Promoter,Quiescent,RegPermissive,Transcribed,Bivalent,group)
meanCombM <- melt(meanComb,id.vars = "group")

ggplot(meanCombM,aes(group,value,label=value)) +
     geom_col(aes(fill=variable))+
     geom_text(position = "stack")+
     coord_flip()

Las etiquetas de texto aparecen fuera de orden, parecen ser la imagen especular de su orden previsto. (tiene el mismo problema con o sin elcoord_flip())

Un póster tuvo un problema similar aquí:ggplot2: agrega etiquetas de categoría ordenadas al gráfico de barras apiladas

Una respuesta a su publicación propuso revertir el orden de los valores en los grupos, que probé (ver más abajo), el orden resultante en la trama no es uno que haya podido resolver. También este enfoque parece hacky, ¿hay algún error aquí o me falta algo?

x <- c(rev(meanCombM[meanCombM$group=="GWS",]$value),rev(meanCombM[meanCombM$group=="all",]$value))

ggplot(meanCombM,aes(group,value,label=x)) +
geom_col(aes(fill=variable))+
geom_text(position = "stack")+
coord_flip()