r - 在stat_summary_hex中，如果z是一个因数，为什么六边形重叠？

Question

在下面的数据集中，thing1是数字，thing2是一个因数(但在其他方面与thing1相同)。为简单起见，summary函数只是bin中的最大值。当z元素为因数时，六边形重叠。有人知道为什么吗？

library(ggplot2)
library(hexbin)
DF=data.frame(xpos=rnorm(1000),
              ypos=rnorm(1000),
              thing1=rep(1:9,length.out=100),
              thing2=as.factor(rep(1:9,length.out=100)))
ggplot(DF, aes(x=xpos, y=ypos, z=thing1)) +  
  stat_summary_hex(fun=function(x){x[which.max(x)]})
ggplot(DF, aes(x=xpos, y=ypos, z=thing2)) +  
  stat_summary_hex(fun=function(x){x[which.max(x)]})

Answer 1

据我所知，R到hexbin中有两个函数:分别在fMultivar和ggplot2软件包中的hexBinning和geom_hex。并根据样本中最左下点的坐标对六边形的中心进行参数化。

这意味着，如果您拆分样本(根据某个因素，或者在我的情况下，在mapreduce作业中)，则六边形会变得偏心。

因此，我实现了自己的hexbin函数，该函数假定(0,0)为网格的中心(即，如果在(0,0)周围有点，则相应的六边形将在此居中)，并且只需要r(六边形)作为参数。

实现是here(对不起，文本是西类牙语!)。而且，我的实现没有显式的循环:它是完全矢量化的。