R：具有离散变量的边际分布的等高线图

Question

我得到了一个包含各种数字变量的数据集。我将尝试为两个变量的每种组合绘制轮廓/热图图，该图显示相对于相应对的数据点的分布/密度。例如，

ggplot(data, aes(x=var1, y=var2) ) + 
stat_density_2d(aes(fill = ..density..), geom = "tile", contour = FALSE )+
scale_fill_gradient2(low="darkblue",high="darkred",mid="white",midpoint=0.005)  

这将导致下图

现在的问题是

我的数据（分别是变量）仅取整数值，以使绘图之间的间隙分别为谷值。

在这种情况下，有没有更好的方法来绘制此图？ 例如。在整数值之间以某种方式使它平滑还是定义为1的网格大小？

作为数据集，例如可以从“ CASdatasets”库中获取数据集“ freMTPL2freq”，并获取变量“ VehAge”和“ DrivAge”。