poner ordenar leyenda histogramas histograma gráficos grafico ggplot diagrama con como barras barra r ggplot2

ordenar - histogramas en r con ggplot2



Agregar etiquetas a ggplot gráfico de barras (2)

Aqui tienes:

library(scales) ggplot(x, aes(x = filename, fill = variable)) + geom_bar(stat="identity", ymin=0, aes(y=value, ymax=value), position="dodge") + geom_text(aes(x=filename, y=value, ymax=value, label=value, hjust=ifelse(sign(value)>0, 1, 0)), position = position_dodge(width=1)) + scale_y_continuous(labels = percent_format()) + coord_flip()

Me gustaría hacer un diagrama de barras delineado en negro con porcentajes dentro de los bares. ¿Es esto posible desde qplot? Obtengo los porcentajes que aparecen pero no se alinean con las barras en particular.

paquetes: ggplot2, remodelar

x <- data.frame(filename = c("file1", "file2", "file3", "file4"), low = c(-.05,.06,.07,-.14), hi = c(.87,.98,.56,.79)) x$tot <- x$hi + x$low x <- melt(x, id = ''filename'') bar <- qplot(x = factor(filename), y = value*100, fill = factor(variable), data = x, geom = ''bar'', position = ''dodge'') + coord_flip() bar <- bar + scale_fill_manual(name = '''', labels = c(''low'', ''Hi'', "Tot"), values = c(''#40E0D0'', ''#FF6347'', "#C7C7C7")) bar <- bar + geom_text(aes(label = value*100))+geom_bar(colour = ''black'') bar <- bar + opts(panel.background = theme_rect(colour = NA)) bar <- bar + opts(legend.justification = ''bottom'') print(bar)


Esta sería una buena oportunidad para que comiences a qplot usar qplot , a favor de ggplot . Esto será mucho más fácil a largo plazo, créanme.

Aquí hay un comienzo:

library(scales) ggplot(data = x,aes(x = factor(filename),y = value)) + geom_bar(aes(fill = factor(variable)),colour = "black",position = ''dodge'') + coord_flip() + scale_fill_manual(name = '''', labels = c(''low'', ''Hi'', "Tot"), values = c(''#40E0D0'', ''#FF6347'', "#C7C7C7")) + scale_y_continuous(labels = percent_format())

Por razones filosóficas, te dejaré la anotación ...