我正在尝试使用 ggplot2 绘制位置热图，按星期几分面。我的数据集非常大，计算速度非常慢。我开始尝试
ggplot(aes(x=x, y=y), data=df) + facet_wrap(~day) +
stat_density_2d(geom="raster", aes(fill=..density.., alpha=..density..))
但是我意识到这需要很长时间，所以我尝试了
ggplot(aes(x=x, y=y), data=df) + facet_wrap(~day) +
stat_density_2d(geom="polygon", n=10, aes(fill=..level.., alpha=..level))
但这仍然需要很长时间才能产生。
对于大型数据集，最好的方法是什么？