先上圖

R語(yǔ)言的REmap包擁有非常強(qiáng)大的空間熱力圖以及空間遷移圖功能，里面內(nèi)置了國(guó)內(nèi)外諸多城市坐標(biāo)數(shù)據(jù)，使用起來(lái)方便快捷。

開始首先安裝相關(guān)包

install_packages("devtools")
install_packages("REmap")
library(devtools)
library(REmap)

我們來(lái)試試其強(qiáng)大的城市坐標(biāo)獲取功能

city<- c("beijing","上海")
get_geo_position(a)

我們可以得到如下表結(jié)果，即上海和北京兩所城市的經(jīng)緯度坐標(biāo)，這樣寫可以看出，無(wú)論輸入漢語(yǔ)拼音“beijing”或是漢語(yǔ)“上?！?，都是可以被識(shí)別的。

得到我們想要的數(shù)據(jù)如下：

數(shù)據(jù)處理完后便可以直接繪圖了

options(remap.js.web = T)
theme1 <- get_theme(theme = "dark",lineColor = "White",backgroundColor = "black",titleColor = "#fff",borderColor = "blue",regionColor = "white",labelShow = T,pointShow = F,pointColor = "gold")
remapH(df2,maptype = 'china',theme=theme1,blurSize = 35,color = "blue",minAlpha = 20,opacity = 1)

• 第一句options是為了將web設(shè)置為激活狀態(tài)，由于REmap是基于D3.js繪圖引擎的，需要使用網(wǎng)頁(yè)js產(chǎn)生動(dòng)態(tài)效果。
• 第二個(gè)是為了生成一個(gè)主題，這個(gè)就像ggplot2的一個(gè)圖層一樣（個(gè)人理解），其中，theme為主題，有Dark，Bright，Sky，None四種，選前三種時(shí)后續(xù)設(shè)置失效，因?yàn)槟愣级ㄖ黝}了，怎么還想做其他調(diào)整呢？如果要設(shè)置線條顏色，背景色，邊界顏色這些，主題就要選擇為None，其余的顏色設(shè)置自己摸索吧，不會(huì)就參看get_theme命令。
• 第三行即畫圖命令，theme=theme1來(lái)指定主題，blursize和minalpha是調(diào)整顏色區(qū)塊大小和深淺的，大家自己調(diào)整之后看看效果就知道啦！

其他空間作圖

當(dāng)然，如果你覺(jué)得這種方式不夠美觀，又想將空間數(shù)據(jù)以較美觀的方式呈現(xiàn)，你也可以嘗試空間分位圖，推薦軟件GeoDa和Stata，當(dāng)然R也可以畫，但是會(huì)非常難看。這里上一張stata的直出圖：

stata命令非常簡(jiǎn)單，畫這一張圖只用了一行命令，但是你需要.shp文件，即地理坐標(biāo)數(shù)據(jù)文件，該數(shù)據(jù)在世界地理信息網(wǎng)站上可以免費(fèi)下載到。

GeoDa是一款專門做界面空間計(jì)量的軟件，能夠以界面的方式繪制各種空間圖形，非常好用，但是也有其分析的局限性。

當(dāng)然不能忘了還有ArcGis地理信息系統(tǒng)，這個(gè)太強(qiáng)大了。

到此這篇關(guān)于R語(yǔ)言繪制空間熱力圖實(shí)例講解的文章就介紹到這了,更多相關(guān)R語(yǔ)言繪制空間熱力圖內(nèi)容請(qǐng)搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家！

最新評(píng)論