raggruppate grafico a barre

Question

ho i seguenti dati:

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 

Utilizzando R, voglio fare un grafico a barre in cui v'è un bar per la rigaA e un bar per rigaB per ogni bin. Posso raggruppare total_dist di uno o dell'altro (plot(total_dist~bin) o plot(total_dist~groupname)). Ma non riesco a capire come combinarli.

voglio qualcosa che sembra simile a questo esempio:

Answer 1

Ecco una soluzione classica. (Supponendo tua dataframe è chiamato 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")) 

e qui sta soluzione con 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")