GGPLOT2：geom_hex標籤

Question

我想添加標籤geom_hex，這產生了兩個問題：

1. 如何我得到他們的座標;
2. 我該如何提取他們的計數值？

小例子：

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，如果有誰知道，如果暈死一直沒有實現我會有興趣知道，太）

Answer 1

你可以使用以下標記來標記每個垃圾箱：

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：是你想要的數量嗎？ abels？似乎這樣，但我不能完全肯定）