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

在本文中，我將創(chuàng)建紐約市機(jī)動(dòng)車(chē)碰撞的市鎮(zhèn)級(jí)熱圖。數(shù)據(jù)來(lái)自紐約市數(shù)據(jù)。特別是，我將從鎮(zhèn)級(jí)碰撞到街道級(jí)碰撞。在下面，我加載ggmap包和數(shù)據(jù)。

?

我使用下面的三個(gè)函數(shù)來(lái)處理我的數(shù)據(jù)。boro（）函數(shù)子集用于與指定自治市中的街道名稱(chēng)。accident_freq（）函數(shù)計(jì)算每條街道的碰撞頻率，然后將這些數(shù)字合并。Assign_col（）函數(shù)獲取特定市鎮(zhèn)的碰撞級(jí)別數(shù)據(jù)集（使用accident_freq（）函數(shù)創(chuàng)建），并為每條街道分配從白色到指定顏色（例如綠色，紅色等）的顏色。碰撞更多的街道將更暗。

最后，我使用ggmap的get_map（）函數(shù)獲取NYC的樣式圖并添加geom_path圖層。每個(gè)市只有一個(gè)geom_path（）層。Geom_path（）使用直線(xiàn)或“路徑”連接同一條街道上的所有經(jīng)度和緯度點(diǎn)。組中的所有坐標(biāo)都已連接。然后使用col =參數(shù)為每行賦予一個(gè)由assign_col（）確定的顏色。

請(qǐng)選中你要保存的內(nèi)容，粘貼到此文本框