R 中带梯度的热图答案

【问题标题】：Heatmap in R w/ gradientR 中带梯度的热图
【发布时间】：2014-03-30 01:09:53
【问题描述】：

我需要帮助在 R 中处理地图。这是我第一次尝试使用 R 的地图工具，需要帮助。我正在尝试为城市中的每家餐厅绘制 Yelp 的星级评分。我开始的代码只给出了餐厅的位置，而不是星级。我的希望是对星级评分有一个渐变，5 为红色，1 为黄色，或者差不多。任何帮助表示赞赏！

library(ggmap)
Phoenix <- get_map(location = 'Phoenix', zoom = 11)
ggmap(Phoenix)

mapPoints <- ggmap(map) + geom_point(aes(x=longitude, y=latitude, size=sqrt(stars)), data=cleanDataFrame, alpha=.1)

我使用的数据框的结构如下：

        business_id longitude stars latitude duration
1 --5jkZ3-nUPZxUvtcbr8Uw -111.9269   4.5 33.46337      381
2 --BlvDO_RG2yElKu9XA1_g -111.8983   4.0 33.62146      690
3 -_Ke8q969OAwEE_-U0qUjw -112.1863   4.5 33.65387      604
4 -_npP9XdyzILAjtFfX8UAQ -112.0739   3.0 33.44990     1916
5 -2xCV0XGD9NxfWaVwA1-DQ -112.2766   4.0 33.56626      226
6 -3WVw1TNQbPBzaKCaQQ1AQ -112.0692   3.5 33.48585     2190

【问题讨论】：

你的意思是合唱团吗？
或者你想根据评分给点上色吗？
@hrbrmstr 现在我看到你的问题似乎更像是 OP 所追求的，但我们会看到。
我不确定 choropleth 是什么。是的，我希望颜色反映编号等级。感谢您的帮助。

标签： r google-maps map latitude-longitude heatmap

【解决方案1】：

您是否尝试根据星数为点着色？

加载数据框：


df <- read.table(text='        business_id longitude stars latitude duration
1 --5jkZ3-nUPZxUvtcbr8Uw -111.9269   4.5 33.46337      381
2 --BlvDO_RG2yElKu9XA1_g -111.8983   4.0 33.62146      690
3 -Ke8q969OAwEE-U0qUjw -112.1863   4.5 33.65387      604
4 -_npP9XdyzILAjtFfX8UAQ -112.0739   3.0 33.44990     1916
5 -2xCV0XGD9NxfWaVwA1-DQ -112.2766   4.0 33.56626      226
6 -3WVw1TNQbPBzaKCaQQ1AQ -112.0692   3.5 33.48585     2190')

并在为点定义颜色渐变的同时绘制图像（如您所说的从黄色到红色）。

ggmap(Phoenix) + geom_point(aes(x=longitude, y=latitude, color=stars), size=5, data=df, alpha=.3) + scale_color_gradient(low="yellow",high="red")

这将产生以下内容（我增加了 alpha 和大小以使其更易于查看）：

【讨论】：

看起来不错。但我收到一个错误，我不知道如何处理。删除了包含缺失值的 2103 行 (geom_point)
您的数据框中是否有任何缺失值？另外，这是错误还是警告？
这是一条警告信息。也没有缺失值。
如果输出仍然正确，只需将 na.rm=TRUE 添加到您的 geom_point 调用中即可删除警告。否则 ggplot 不喜欢数据点的某些东西——也许它们超出了界限？还是类型不对？