bar groupé graphique

Question

je les données suivantes:

bin groupname total_dist 
0 rowA 377 
0 rowA 306.6 
0 rowB 2.1 
0 rowB 110.6 
1 rowA 918.1 
1 rowA 463.2 
1 rowB 798.2 
1 rowB 1196 
2 rowA 1295.1 
2 rowA 1269.1 
2 rowB 698 
2 rowB 1022.1 

En utilisant R, je veux faire un graphique à barres où il y a un bar pour ligneA et un bar pour ligneB pour chaque bac. Je peux grouper total_dist par l'un ou l'autre (plot(total_dist~bin) ou plot(total_dist~groupname)). Mais je ne peux pas comprendre comment les combiner.

Je veux quelque chose qui ressemble à cet exemple:

Answer 1

Voici une solution classique. (Supposant votre dataframe est nommé df)

data <- tapply(df$total_dist, list(df$groupname,df$bin), sum) 

barplot(data,beside=T,col=c("#ee7700","#3333ff") 
,main="European Parliament Elections",xlab="Group",ylab="Seats") 

legend(locator(1),rownames(data),fill=c("#ee7700","#3333ff")) 

et voici la solution en utilisant ggplot2

library(ggplot2) 
qplot(factor(bin),data=df,geom="bar",fill=groupname,weight=total_dist,position="dodge", 
main = "European Parliament Elections", xlab="Group",ylab="Seats")