我想为geom_hex添加标签,这提出了两个问题:
最小例子:
pipeline <- read.csv(url('http://dl.dropboxusercontent.com/u/7446674/pipeline.csv'),sep="\t",header=T)
pipeline <- pipeline[pipeline$Units>0,]
ggplot(pipeline,aes(x=Longitude,y=Latitude))+
#stat_density2d(n=25,aes(fill=..level..), geom="polygon") +
geom_hex(bins=12)+
coord_equal(ratio = 1/1)+
theme_bw()+
ggtitle('San Francisco Development Pipeline\nQ2 2013')
(另外,在geom_hex上,如果有人知道重量是否已经实现,我也有兴趣知道它)
答案 0 :(得分:5)
您可以使用以下方式为每个bin标记其计数:
ggplot(pipeline,aes(x=Longitude,y=Latitude))+
geom_hex(bins=12)+
stat_binhex(aes(label=..count..), geom="text", bins=12, colour="white") +
coord_equal(ratio = 1/1)+
theme_bw()+
ggtitle('San Francisco Development Pipeline\nQ2 2013')
(PS:这是你想要的标签吗?看起来那样,但我并不完全确定)