3

我想给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 上,如果有人知道是否已实施称重,但我也有兴趣知道这一点) 在此处输入图像描述

4

1 回答 1

6

您可以使用以下方法标记每个 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:是不是你想要的标签数量?看起来是这样,但我不完全确定)

标记计数

于 2013-10-01T23:37:30.337 回答