分组数据图 - 过去的问题没有任何作用

时间:2014-12-12 07:25:33

标签: r plot ggplot2

我有以下数据

                     Geography Population.Estimate Energy.Consump Employed  Year
1   Alameda County, California             1513228     3038.53227   676598  2010 
2    Alpine County, California                1163       17.14083      387  2010
3    Amador County, California               37862      140.65325    15103  2011 
4     Butte County, California              219973      722.73871    90130  2011
5 Calaveras County, California               45457      198.95724    17085  2012
6    Colusa County, California               21483       63.77387     9489  2012

这只是来自58个县的数据的一部分。

我想制作一个箱形图来显示x轴 - 人口和y轴 - 2010年,2011年,2012年的能源消耗。我尝试了很多东西,但它不起作用。请帮我把这些情节。我使用qplot以及ggplot。这些数据似乎没有任何作用:(

我试过这个

qplot(factor(Year),data=Population,geom="bar",fill=Population.Estimate,weight=En‌​ergy_Consump,position="dodge", main = "Effect of Energy", xlab="Population",ylab="Energy")

我也试过这个

ggplot(Population)+ geom_bar(aes(x=Housing.Units,y=Energy.Consump, fill=factor(Year)),stat="identity")

我正在努力做到正确。我尝试了堆栈溢出中的其他示例,因为我对R很新,但似乎没有任何工作

1 个答案:

答案 0 :(得分:0)

这是你想要的吗?

ggplot(data=Population, aes(x=Population.Estimate, y=Energy.Consump, fill=as.factor(Year))) + 
 geom_bar(colour="black", stat="identity",
       position=position_dodge()) +                        # Thinner lines
 xlab("Population") + ylab("Energy Consumption") 

enter image description here

不是吗?

ggplot(data=Population, aes(x=Year, y=Population.Estimate, fill=Geography)) + 
  geom_bar(colour="black", stat="identity",
       position=position_dodge()) +     
  xlab("Year") + ylab("Energy Consumption") 

enter image description here

鉴于规模上存在巨大差距,如果您希望人口和能源消耗在同一图表上,IMO,人均能源消耗更适合。