我想将我的数据绘制为密度图,其中有2003年至2006年的4年。 我的部分数据如下所示:(县,年,x =平均价格)
SFO 2003-01-01 464592.0
Alameda 2003-01-01 452649.4
Santa Clara 2003-01-01 767437.5
San Mateo 2003-01-01 543756.1
Napa 2003-01-01 691220.3
Contra Costa 2003-01-01 699626.9
我试过densityplot( ~ price | county, housing)
,但这不是我想要的。
它给了我这样的东西。
虽然我尝试了lines()
如果我使用plot()
,它会给出:
这不是我想要的......
我想要的是一个密度图,其中有6条不同颜色的线代表该县。 X轴将是年份,而y-sxis将是价格。
请帮帮我!谢谢!
答案 0 :(得分:0)
这不是密度图。要绘制一个县的平均价格作为年份的函数,这将是您学习使用aggregate
或plyr
的一个很好的借口。为了保持尽可能简单,这是一种不使用强大功能的笨重方法。假设您的数据框名称为“county”,“year”和“price”。
sfomean <- sapply(unique(data$year), function(x) mean(data[(data$county=='SFO' & data$year==x),3])
对其他县名重复,或在
中包装上面的行sapply(unique(data$county),function(y) sapply(unique(data$year), function(x) mean(data[(data$county==y & data$year==x),3]) )