La última imagen en this blog post.¿Cómo se crea un gráfico de barras "anidado"?
He intentado buscar "gráfico de barras anidado" y "gráfico de barras jerárquico", pero puede que no sean las adecuadas.
La última imagen en this blog post.¿Cómo se crea un gráfico de barras "anidado"?
He intentado buscar "gráfico de barras anidado" y "gráfico de barras jerárquico", pero puede que no sean las adecuadas.
Uso ggplot
y crear capas separadas:
library(ggplot2)
set.seed(1)
stupid <- data.frame(
group= LETTERS[1:5],
men = sample(1:10, 5),
women = sample(1:10, 5)
)
# Melt the data and calculate totals
mstupid <- melt(stupid, id.vars="group")
stupidTotal <- ddply(mstupid, .(group), summarize, value=sum(value))
ggplot() +
geom_bar(data=stupidTotal, aes(x=group, y=value), fill="grey50") +
geom_bar(data=mstupid, aes(x=group, y=value, fill=variable),
stat="identity", position="dodge") +
theme_bw()
Busque 'barNest' en el paquete plotrix
Utilice esta:
ggplot() +
geom_bar(data=stupidTotal, aes(x=group, y=value, fill="grey50"), stat="identity") +
geom_bar(data=mstupid, aes(x=group, y=value, fill=variable),
stat="identity", position="dodge") +
theme_bw()