13

我有以下数据:

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

使用 R,我想制作一个条形图,其中每个bin 都有一个用于 rowA 的条和一个用于 rowB 的条。我可以将 total_dist 按一个或另一个(plot(total_dist~bin)plot(total_dist~groupname))分组。但我不知道如何将它们结合起来。

我想要看起来类似于这个例子的东西: 分组条形图示例

4

1 回答 1

29

这是一个经典的解决方案。(假设您的数据框名为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"))

这是使用 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")

替代文字

于 2010-06-09T16:26:32.467 回答