原文链接：http://tecdat.cn/?p=12430

在本文中，我将创建纽约市机动车碰撞的市镇级热图。数据来自纽约市数据。特别是，我将从镇级碰撞到街道级碰撞。在下面，我加载ggmap包和数据。

我使用下面的三个函数来处理我的数据。boro（）函数子集用于与指定自治市中的街道名称。accident_freq（）函数计算每条街道的碰撞频率，然后将这些数字合并。Assign_col（）函数获取特定市镇的碰撞级别数据集（使用accident_freq（）函数创建），并为每条街道分配从白色到指定颜色（例如绿色，红色等）的颜色。碰撞更多的街道将更暗。

最后，我使用ggmap的get_map（）函数获取NYC的样式图并添加geom_path图层。每个市只有一个geom_path（）层。Geom_path（）使用直线或“路径”连接同一条街道上的所有经度和纬度点。组中的所有坐标都已连接。然后使用col =参数为每行赋予一个由assign_col（）确定的颜色。

请选中你要保存的内容，粘贴到此文本框