R語言數(shù)據(jù)地圖中的全球填色地圖是怎樣的

R語言數(shù)據(jù)地圖中的全球填色地圖是怎樣的，很多新手對此不是很清楚，為了幫助大家解決這個難題，下面小編將為大家詳細講解，有這方面需求的人可以來學習下，希望你能有所收獲。

10年積累的成都網(wǎng)站設計、成都網(wǎng)站建設經(jīng)驗，可以快速應對客戶對網(wǎng)站的新想法和需求。提供各種問題對應的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡服務。我雖然不認識你，你也不認識我。但先網(wǎng)站制作后付款的網(wǎng)站建設流程，更有古雷港免費網(wǎng)站建設讓你可以放心的選擇與我們合作。

今天介紹的是美國地圖，同樣的方法技巧，不同的對象。

整個過程以及代碼并沒有太大差別，只要拿到世界地圖素材，根據(jù)之前的代碼，自己修改參數(shù)和指標名稱以及引用路徑，完全可以做出來（盡管并不一定理解每句代碼的含義）。

R語言環(huán)境:

R x64 3.31/Rstudio 0.99.903/ggplot2 2.1.0

代碼過程：

加載功能所需支持的工具包：

library(ggplot2)

library(plyr)

library("maptools")

導入并整理世界地圖地理信息數(shù)據(jù)：

world_map <-readShapePoly("c:/rstudy/wold_map/World_region.shp")

x <- world_map@data    #讀取行政信息

xs <- data.frame(x,id=seq(0:250)-1)  #含島嶼共251個形狀

world_map1 <- fortify(world_map)       #轉(zhuǎn)化為數(shù)據(jù)框

world_map_data <- join(world_map1, xs, type = "full") #合并兩個數(shù)據(jù)框

導入指標文件數(shù)據(jù)并合并成作圖數(shù)據(jù)：

mydata <- read.csv("C:/rstudy/wold_map/Region_map.csv")   #讀取指標數(shù)據(jù)，csv格式

world_data <- join(world_map_data, mydata, type="full")   #合并兩個數(shù)據(jù)框

地圖填充過程代碼：

這里還是通過調(diào)整映射方式參數(shù)：coord_map("ortho", orientation = c(30, 110, 0))可以變換地圖的呈現(xiàn)視角：

常見平面視角的全球地圖填充：

ggplot(world_data, aes(x = long, y = lat, group = group,fill = zhibiao1)) +

      geom_polygon(colour="grey40") +

      scale_fill_gradient(low="white",high="steelblue") +  #指定漸變填充色，可使用RGB

      theme(               #清除不需要的元素

            panel.grid = element_blank(),

            panel.background = element_blank(),

            axis.text = element_blank(),

            axis.ticks = element_blank(),

            axis.title = element_blank(),

            legend.position = c(0.2,0.3)

            )#平面地圖

立體空間地圖：（添加有映射方式參數(shù)coord_map）

ggplot(world_data, aes(x = long, y = lat, group = group,fill = zhibiao1)) +

     geom_polygon(colour="grey40") +

     coord_map("ortho", orientation = c(30, 110, 0))+

     scale_fill_gradient(low="white",high="steelblue") +  #指定漸變填充色，可使用RGB

     theme(               #清除不需要的元素

          panel.grid = element_blank(),

          panel.background = element_blank(),

          axis.text = element_blank(),

          axis.ticks = element_blank(),

          axis.title = element_blank(),

          legend.position = c(0.2,0.3)

          )#映射成空間地圖

以上的語法有幾點需要提示一下：

第一、代碼中帶#號后的文本是R語言認可的注釋語句，帶運行代碼的時候不必清除，可以直接跑。

第二、由于全球地圖呈現(xiàn)的信息比較豐富，所有的海島和群島信息全部都會上色，特別是北歐、北美（加拿大）、大洋洲這些多島嶼、群島低于會有大量的密集分布的小島，而填色代碼在填充時，多邊形線條填充為灰色，造成很多地區(qū)邊界以及島鏈出現(xiàn)大面積黑灰色。

看起來很不美觀，所以如果可以將線條色設置為白色，這樣效果會好些：geom_polygon(colour="white")

但是這樣做也會有不足，因為漸變色的色值范圍是從(low="white",high="steelblue")連續(xù)過渡的，這樣數(shù)值接近于零的地區(qū)會被填充為純白，這樣與邊線的白色會混雜，導致局部地區(qū)邊界難辨。

當然你也可以嘗試用雙色過渡。

我把漸變范圍的低值與高值起點色和重點色替換成了：(low="DeepSkyBlue",high="OrangeRed")。

看起來比剛才由low="white"到high="steelblue"看著舒服一些。

但是通常來講根據(jù)數(shù)據(jù)地圖的填色規(guī)范：

指標都是正值，應該使用單色系連續(xù)漸變填充，只有在存在正負值類型的數(shù)據(jù)時，雙色漸變才比較有意義。

所以用色規(guī)范還要遵循的，不過自己練著玩就沒那么多將就了，可以想怎么弄就怎么弄。

看完上述內(nèi)容是否對您有幫助呢？如果還想對相關知識有進一步的了解或閱讀更多相關文章，請關注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝您對創(chuàng)新互聯(lián)的支持。

名稱欄目：R語言數(shù)據(jù)地圖中的全球填色地圖是怎樣的
瀏覽路徑：http://muchs.cn/article42/ippchc.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站策劃、服務器托管、靜態(tài)網(wǎng)站、手機網(wǎng)站建設、搜索引擎優(yōu)化、做網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)