R 在ggmap上创建两个geom_瓷砖层

我试图用geom_tile在ggmap上表示两个变量（犯罪和租金）。就个人而言，这两张地图看起来都很棒

heat_crime = ggmap(cmap) + 
        geom_tile(data = LatLonCounts_crime, aes(x = Longitude, y = Latitude, alpha = Frequency), fill="red") + 
        scale_alpha(range = c(0, 0.8))

heat_price = ggmap(cmap) + 
        geom_tile(data = mean_price_per_bedroom_per_tile, aes(x = Longitude, y = Latitude, alpha = mean_price), fill="blue") + 
        scale_alpha(range = c(0, 0.8))

我想在同一张地图上添加两个geom_瓷砖。我试过这个：

heat_all = ggmap(cmap) + 
        geom_tile(data = LatLonCounts_crime, aes(x = Longitude, y = Latitude, alpha = Frequency), fill="red") + 
        scale_alpha(range = c(0, 0.8)) + 
        geom_tile(data = mean_price_per_bedroom_per_tile, aes(x = Longitude, y = Latitude, alpha = mean_price), fill="blue") + 
        scale_alpha(range = c(0, 0.8))

但是geom_瓷砖覆盖层将价格和犯罪变量合并为一个变量（当您查看图例时就会清楚）

---

如何保持两个变量完全分离并在同一个ggmap上显示它们？

相反，似乎两个geom_图块都被绘制为单独的图层，因此图例标题为“频率”，即首先添加的图层。尝试将

show.legend=TRUE

添加到对

geom_tile

的两个调用中，以确认是否存在这种情况。此外，如果您可以发布一些示例数据，则更容易提供帮助：）。欢迎使用堆栈溢出！寻求调试帮助的问题（“为什么这段代码不起作用？”）必须包括所需的行为、特定的问题或错误以及在问题本身中重现它所需的最短代码。没有明确问题陈述的问题对其他读者没有用处。请参见：如何创建。使用“编辑”链接改进您的问题-不要通过评论添加更多信息。谢谢