怎么用R语言绘制英文中国地图，标注英文省名，以及在不同的省份填充指定的颜色？ - 知乎273被浏览<strong class="NumberBoard-itemValue" title="1分享邀请回答library(maps)
library(mapdata)
这两个R Package，具体操作步骤可以参考yixuan的这篇文章：我在这里就不再重复说明了。R这么强大的统计分析工具当然不满足一个弱爆了的静态地图，所以R同样可以绘制出更强大的交互式地图（interractive map）。接下来我就告诉大家怎么利用R来绘制交互式地图。哦，对了，首先回答你的问题，如果我没有理解错的话，你是想根据数据来为不同的省份标记不同的颜色对吧？就如上图一样？比如说根据不同省份的人口标记不同的颜色？颜色越深代表该省份人口越多？如果这是你想要的效果的话，下面我就来解释一下怎么可以绘制出这样的交互式地图。所谓交互式地图，就是当你对地图进行操作的时候，地图会做出相应的回应，就比如说上面的这幅地图，当你点击某个省份的时候，地图就会自动弹出一个窗口显示出该省的省份名称和该省的人口数量。
无论你需要绘制哪个国家的地图，首先第一步是找到该国家的shape文件，所谓shape文件就别人制作好的一种空间开放文件，具体到底是什么可以参考维基百科（）。
去哪里找shape文件： 这个也是我当时做公司Project的时候找到的一个网站。上面基本可以下载各个国家的shapefile，不客气。
然后找到中国的shapefile之后下载下来，就可以去R里面绘制地图了。这里需要2个R Packages。分别是：library(leaflet)
library(rgdal)
其中leaflet就是绘制交互式地图的核心包了，详情请见：直接上代码了：＃导入leaflet 和rgdal包
library(leaflet)
library(rgdal)
＃设置你下载的shapefile的路径
dns &- "C:/R/Chinashape"
＃获取shape文件
fn &- list.files(dns, pattern=".shp", full.names=FALSE)
fn&-gsub(".shp", "", fn)
＃读取shape文件
shape &- readOGR(dns, fn)
＃获取人口数据
population &- read.csv("C:/Chinashape/CHN_adm1.csv", header = TRUE)
＃把人口数据合并到shape＠data下
shape &- merge(shape, population, by = "NAME_1")
＃设置弹出窗口
i_popup &- paste0("&strong&Province: &/strong&", shape$NAME_1, "&br&", "&strong&Population: &/strong&", shape$Population)
＃设置颜色范围
pal &- colorQuantile("YlOrRd", NULL, n = 5)
＃绘制地图
leaflet(shape) %&% addTiles() %&% setView(103..597042, zoom = 4) %&%
addPolygons(fillColor = ~pal(shape$Population), fillOpacity = 0.8, color = "#000000", weight = 1, popup = i_popup)
当然leaflet还可以绘制很多其他有趣的地图，比如当时我一个朋友说美国有什么好的，整天不是被恐怖袭击就是发生大规模枪杀案，动不动就死那么多人，还是中国安全。我想说其实我是爱美国佬的银子啊啊啊。不过美国确实没什么好的。我当时无聊为了反驳他们，然后我就用leaflet搞出来几个地图，然后他们再也没有跟我讨论过这个问题了。这幅地图显示了从1970年到现在恐怖事件发生的次数。动态地图链接：恐怖事件在美国造成的死亡人数，圈圈越大死的越多。动态地图链接：恐怖事件在中国造成的死亡人数，圈圈越大死的越多。
动态地图链接：话说我这么玩不会被请去喝咖啡吧？不要举报我。另外你还可以在地图上定位坐标点，比如说我喜欢喝咖啡，所以我想知道世界上的星巴克咖啡店都在哪里（但是其实我并不喜欢星巴克的咖啡，甜的要死有什么好喝的？搞不懂）。我就可以画出一张这样的地图来定位星巴克咖啡店的位置。动态地图链接：＃以下为更新来回答提问者的问题：
目前根据的方法，暂时不能满足你标注英文名称在地图上的需求，但是可以根据省份标记不同的颜色。以下为代码：library(maptools) x &- readShapePoly('CHN_adm1.shp')
getColor=function(mapdata,provname,provcol,othercol) { f=function(x,y) ifelse(x %in% y,which(y==x),0);
colIndex=sapply(x@data$NAME_1,f,provname);
col=c(othercol,provcol)[colIndex+1]; return(col); }
provname=c("Anhui","Beijing","Chongqing","Fujian")
provcol=c("red","red","yellow","purple")
plot(x,col=getColor(x,provname,provcol,"white"))
＠library(maptools) x &- readShapePoly('bou2_4p.shp') getColor=function(mapdata,provname,provcol,othercol) { f=function(x,y) ifelse(x %in% y,which(y==x),0);
colIndex=sapply(iconv(x@data$NAME,from="CP936", to="UTF-8"),f,provname);
col=c(othercol,provcol)[colIndex+1]; return(col); }
provname=c("黑龙江省", "江苏省", "浙江省", "江西省", "山东省", "湖北省", "四川省", "甘肃省")
provcol=c("grey","grey","grey","grey","grey","grey","grey","grey")
plot(x, col = getColor(x,provname,provcol,"white"), xlab = "", ylab = "")
title("Map of China")
19258 条评论分享收藏感谢收起145 条评论分享收藏感谢收起world map 世界地图英文高清PDF_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
world map 世界地图英文高清PDF
&&高清PDF 版 世界地图
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
你可能喜欢传奇世界各个地图入口坐标大全传奇世界――17173网络游戏专区
> 综合经验> 正文
传奇世界各个地图入口坐标大全
　　　　　　　　　　 【
　　西域奇境 西域衣服城后面的山包上435，103
　　西域奇境 通天塔祭天旁小灌木旁134，83
　　西域奇境 西域奇境入禁地关口的那二个弓箭手之间597，611
　　*******************************
　　禁地 小村的木材商人对面盖着红布的酒坛旁边 192，327 or 191.328
　　禁地白云观东边一个小院中间灯箱附近地区417：187 /416：188
　　生死门 进结界门口的，最东面角落 184.63 /180：61(w)
　　结界 生死门进入结界，直走到底的符文附近124：20 /120，24 /116.21
　　*******************************
　　中州 中州西北紫气东来的北面的两个巨石之间305，27/ 303：19
　　中州 王城城墙的西北角弓箭处 467：87 /465 90(w)/420 55/480，82
　　中州 王城东北角红枫林最南端一棵红松树下 715：227 or 718，224
　　中州 中州渡口旁那艘废弃的般附近76，525 /78 522
　　中州 通往海角村北面的那座桥的北桥头附近434，527 /429 523
　　海角村东南角海边501：69/718 224
　　*******************************
　　将军坟东2层 通往叹息回廊的门口附近255，181 /253 179
　　叹息回廊 去悲鸣门口坐标160，296 OR 166，296
　　悲鸣长廊 深处通道尽头，三个埋着白骨的十字架附近170，70 OR 175.65
　　将军坟东4层 通往东5层的门口附近123，156
　　将军坟东5层 奸商附近86，197
　　*******************************
　　将军坟1层 最东部的小房间，最上角的兵马俑附近 468，245
　　将军坟2层 最靠东面的角落 377：225 /379.225
　　将军坟3层 最北边的角落附近 199，33 /198 34
　　将军坟3层 去将军殿的门口口152，167 or 151 166
　　******************************
　　落霞村 西南方向篱笆的那个唯一缺口195，258
　　落霞村中央水井边226：240
　　落霞矿区 门口那块大石头旁473，407 /471，402(w)
　　西部矿区疏散通道→矿精场→南断层→即到
　　西部矿区 通往南部断层那个门口的木桶边90，113
　　避难所疏散通道→北部矿区→即到
　　避难所 通往东部矿区的那个门口附近34，59
　　东部矿区疏散通道→北矿区→避难所→即到
　　东部矿区 西边那个大坪里那一堆木桶和木箱中间44，52
　　东部矿区东部矿区到避难所门口24：124 /28 123
　　矿石精选场 中间那个大坪里5个成堆的木桶旁68，69
　　南部断层 木板桥下方那条铁轨最南端的尽头附近75，91 / 75 88 /76 88
　　南部断层那座桥中间的土墩上面41：30
　　北部断层 那座桥中间的土墩上面47，30 or 48，30 /46，30/48 33
　　中部矿区疏散通道→即到
　　中部矿区到尸王殿门口64：141
　　北部矿区至疏散通道→即到
　　北部矿区到避难所门口铁轨28：123 OR 24 124
　　北部矿区疏散通道111：16
　　*******************************
　　热沙荒漠 红名村阿正那里 142，824 /140 825
　　热沙荒漠 铁匠旁边的水井附近266，454
　　热沙荒漠 热沙最北部的西部海滩162，135 /164 134/160 137
　　*******************************
　　沙城药店门口202：390
　　跃马平原 沙城武器店后面的水井边167，332
　　跃马平原 跃马平原孤独老人小屋门口148，603 /149 603
　　逆魔古刹3层 变身为军机令使者的弓箭手附近280，221
　　逆魔古刹4层 通往太极阵门口边的小房间角落 245.97 /245 19
　　逆魔古刹4层 入口的小房子里的角落148，268 / 136.279 /136.280(w)
　　*******************************
　　中枢大殿机关道一→机关道二→即到
　　机关支路二 神工堂通往中转厅一门口，机关巨兽的残骸附近 66，188 /64：184
　　仓库一天机堂→工坊三→即到
　　仓库一 通往中枢大殿的门口，两堆木头中间56，24
　　四岔道 通往角斗场的楼梯口199，44
　　工坊大厅一(天机堂或)机支一→机道三→即到
　　工坊大厅一 通往机关道三的门口，三个青铜兽雕像，最大的 93，145
　　工坊大厅二至神工堂转→即到
　　工坊大厅二 下神工堂的那个楼梯口28，51
　　工坊大厅三至天机堂即到(可去中转一、长廊)
　　工坊大厅三 下机关道二的那个楼梯口54，45 /52 44
　　工坊大厅四机关支路一→即到
　　工坊大厅四 大厅最东部，四张床和一个圆桌附近121，69
　　回旋通道二机关支路一→盘道四→即到
　　回旋通道二下盘道三楼梯口45：177
　　角斗场支路一→盘四→回二→盘三→即到
　　角斗场 角斗场军机令任务的那个铜人 129，120 /131.121/132 120
　　神工堂 通往工纺大厅二的门口`两个巨大的青铜兽雕象 185，197/184 152
　　天机堂 最南边二个青铜雕像之间 68：201/68.202 /67：203(王)
　　造化堂机关支路一→机关道二→即到
　　造化堂 到仓库2的门口 青铜兽 108：20 /107.16
　　*******************************
　　百虫穴 最南部的旅人附近157，369
　　盘蛇道 通往蛇之巢的门口附近235，293 / 234，297 /232 295 /235 295
　　蛇之巢 通往蛇之骸的门口附近236，117 /238 117
　　蛇之骸往蛇环阵的门口附近194：272
　　*******************************
　　炼狱魔境1层 最北部偏西那个角落134，64
　　炼狱魔境1层最北部偏东260：67/259：67/261 68
　　炼狱魔境1层 最西部的那个角落46，195
　　炼狱魔境1层 最东部那个角落345，208
　　炼狱魔境1层最南偏西177：326
　　炼狱魔境1层最南偏东275：315
　　炼狱魔境2层 刚进门上面左边的第一个兵马俑附近26，207
　　炼狱魔境2层 回海岛传送门 204：176 /202.172
　　炼狱魔境2层 下魔镜三层那个房间，中间有个雅致的香炉231，249
　　炼狱魔境2层 最北部角落的一个兵马俑附近201，36
　　炼狱魔境2层 最北部的那个角落沿墙壁往左下方向走，在第一个打开的石棺附近192，47
　　炼狱魔境2层 最东部那个角落379，225 /379，227/378：223/377，225/377 255/377 256
　　炼狱魔境2层最南227：381/225 383/225 381
　　炼狱魔境3层 一层进入炼狱魔镜三层向前第一个的青铜兽雕像附近机关61，68
　　炼狱魔境3层 一层进三层后一直往前走，在第一个十字路口往右拐路头有两队铜锤手雕像52，129
　　炼狱魔境3层 一层进三层后一直往前走，经过二个十字路口，路的终点的青铜兽 181，185
　　炼狱魔境3层 二层进炼狱魔镜三层以后，沿着墙往上面走机关巨兽雕象附近166，27
　　炼狱魔境3层 二层进入三层后沿着墙向下走机关巨兽雕象附近的222，81
　　炼狱魔境3层 进4层的门口，三个铜锤手中间的那个附近 67，191
　　炼狱魔境3层到4层青铜兽49：190 /48 184
　　炼狱魔境3层 回海岛的传送门121.125 or 120，128
　　炼狱魔境4层 往魔镜3层的门口，一个巨蛇缠绕的柱子附近288，97
　　炼狱魔境4层 往魔镜3层的门口 往东南方向走，那里有颗奇怪的树324，134
　　炼狱魔境4层 往魔镜沼泽的门口，一个巨蛇缠绕的柱子附近 195，272
　　炼狱魔境4层 往魔镜沼泽的门口往东南方走那里有一个大柱附近215，297/ 214，293
　　炼狱魔境4层 回海岛的传送门附近 348：285/348，286(p) /344.284(W)/348，284/346，284
　　炼狱魔境4层 最北部有白蛇守护的点223，13
　　炼狱魔境4层 最南的地方，往西北方向一个很多白骨的池子旁边 195，373
　　最南216：406
　　炼狱魔境4层 最西部那个角落往东南方向走的第一个拐弯处85，312
　　炼狱魔境4层 最西部那个角落往东北方向走的第一个拐弯处78，179 / 79.179
　　炼狱魔境4层 最西部那个角落附近，有白蛇守护的那个点17，240
　　魔境沼泽 往魔镜6的门口附近388.43 OR 389，46
　　魔境沼泽 小木桥的中间 52，151
　　魔境沼泽 通往铁血魔城的传送门楼梯附近256，277
　　魔境沼泽 回海岛的传送门附近55，44
　　魔境沼泽 白云谷大石桥中间那个柱子附近111，55
　　魔境沼泽 最东部的角落408，200 /407 193
　　炼狱魔境6层 通往魔镜沼泽的门口59，60 / 58 61
　　炼狱魔境6层 宝藏守护者附近28，30
　　炼狱魔境6层 仓库38，28
　　炼狱魔境7层最西面的角落14 51 /16 49 /16 51
　　炼狱魔境8层 70，168/80 168
　　炼狱魔境8层回6的传送门112 113/111 108
　　炼狱魔境9层 回8层的传诵门141 248/137 250(W)/139，251
　　炼狱魔境9层 回8层的传诵门，上边盘龙柱子附近左边145 241/143 239 (j)
　　炼狱魔境9层 回8层的传诵门，上边盘龙柱子附近右边 154 251(j)
　　炼狱魔境9层 通往6的传送门203：192 /207.192(j)
　　炼狱魔境9层 通往6层的传诵门附近，沿着墙壁往下走的拐角附近191，181 (J)
　　炼狱魔境9层 通往6层的传诵门附近，沿着墙壁往下走的拐角附近213，205 (J)
　　炼狱魔境9层 最北的大象鼻子248，104 (J)
　　炼狱魔境9层 去迷宫的门口 243，119 (J)
　　炼狱魔境9层 去10的楼梯口261，130 (j)
　　炼狱魔境10层 最北边的角落197，26 (J)
　　炼狱魔境10层 最南边的角落226，388 (J)
　　*******************************
　　地下魔域五层 进门的平台的角落 211，29
　　地下魔域五层 最东面有符文的柱子，地上有骷髅248，134 / 250 135 /247 135
　　地下魔域五层 第一个路口往上的喷火怪兽198，61 /198 64 /197 60
　　地下魔域五层最西面有符文的石头附近20 164
　　地下魔域六层6的入口的大石头柱子附近99 250 /98 250
　　地下魔域六层6-2的入口附近336 90
　　地下魔域六层6-2去心之魔芋的入口附近155 134
　　地下魔域六层6-1去心之魔芋的入口附近195 196
　　地下魔域六层最南边的生命之柱226 388
　　地下魔域六层 最北边的封印魔石前，奇怪的符文，英雄的尸骸197 26
　　铁血魔域铁血魔宫台阶前地火雕像附近113：93
　　铁血魔域 去地下魔城4层的2个火盆(灯柱)之间72，212/74，212 /73，211
　　铁血魔城去铁血魔宫唯一小道走到顶右上方有个雕象110/91(w)
　　铁血魔城去铁血魔宫唯一小道的2个火盆之间152 133(j)
此文章由17173.com独家发表，转载请注明出处
　　　　　　　　　　　　　　　　　　 　
<font color=#-18] <font color=#-18] <font color=#-18] <font color=#-11] <font color=#-02] <font color=#-28] <font color=#-17] <font color=#-18] <font color=#-17] <font color=#-03]
热点标签：
热点标签：
建议意见：　商务合作：广告专线：7　客服电话：3传奇世界地图介绍：机关洞
传奇世界地图介绍：机关洞
原文地址：
传奇世界地图介绍：机关洞&&
共有图片&&张，您现在流览的是第&1&张}