如何将stat_summary2d图的每个单元格中的元素数量放在ggplot中？

Question

我已经生成了以下2D图，以显示z变量（z_mean）的平均值如何随变量x和y变化：

生成上图的代码如下：

test = data.frame(group = factor(c(rep(1, 100), rep(2, 100), rep(3, 100))),
              x = sample(20, 300, replace =T),
              y = sample(50, 300, replace =T),
              z_mean = sample(5, 300, replace =T),
              z_sd = runif(300))

ggplot(data=test, aes(x=x, y=y, z=z_mean) ) + 
stat_summary2d(fun = function(x) {mean(x)}, binwidth = c(2, 5))+
# stat_bin2d(binwidth = c(2, 5))+
scale_fill_gradientn(colours=c("green", "yellow", "red"), name = "")+
facet_wrap(~group) +
ggtitle("z_mean")

现在我想把每个单元格内的数据点数放在文本中。有没有办法做到这一点，可能是从stat_bin2d中提取值。有没有办法提取stat_summary2d或stat_bin2d提取的值？

另外，我有另一个数字来表示变量z（z_sd）的标准偏差。见下文：

是否有创意方法将这两个数字合二为一。也许拆分矩形内的矩形或圆的大小。我无法在ggplot中找到一种方法。