2015-02-11 159 views
0

晚上好,任何人都可以帮助密谋。我有这样一些数据:酒吧和ggplot2中的一个阴谋堆积的酒吧

DF <- data.frame(
     country_dest=c("Russia", "Germany", "Ukraine" ,"Kazakhstan", 
     "United States", "Italy", "Israel", "Belarus"), 
     SumTotal=c(7076562,2509617,1032325,680137,540630,359030,229186,217623) 
    ) 

这不是什么大不了的事有独立的8条绘制它,但我想知道知道的是它可能使情节与3条,其中第一条将是以俄罗斯(例如)的数据为第二位的将是德国,乌克兰,哈萨克斯坦,美国和意大利的堆叠酒吧,可能会以一些传奇的方式来了解白俄罗斯和以色列的谁是谁和第三棒。

在互联网上,我找到了一个解决方案来创建具有0值的新DF,但不太明白。

比你提前!

回答

3

那么,你需要添加分组信息到你的数据。然后它变得直截了当。这里有一个战略

#define groups 
grp <-c("Russia"=1, "Germany"=2, "Ukraine"=2,"Kazakhstan"=2, 
     "United States"=2, "Italy"=2, "Israel"=3, "Belarus"=3) 
DF$grp<-grp[as.character(DF$country_dest)] 

#ensure plotting order 
DF$country_dest <- factor(DF$country_dest, levels=DF$country_dest) 

#draw plot 
ggplot(DF, aes(x=grp, y=SumTotal, fill=country_dest)) + 
    geom_bar(stat="identity") 

这会给你

enter image description here

你可能想给你的群体更具描述性的标签。

+0

它的工作原理,但我不得不交换代​​码行DF $ country_dest < - 因子(DF $ country_dest,levels = DF $ country_dest),然后DF $ grp <-grp [DF $ country_dest],并获得成功,谢谢你为你提供帮助) – 2015-02-11 22:17:21