我正在尝试使用 ggplot2 绘制世界地图。这是我到目前为止所拥有的:
library(ggplot2)
world <- map_data("world")
ggplot(aes(long, lat, group=group), data=world) + geom_polygon()
这很好用并且很容易做到。不幸的是,世界地图数据似乎很旧。例如,新加坡和捷克共和国等国家不见了,取而代之的是苏联等地区。知道如何获得更多最新的世界地图数据吗?
排序(唯一(世界$区域)) [1] 《阿富汗》《阿尔巴尼亚》《阿尔及利亚》 [4] 《美属萨摩亚》《安达曼群岛》《安道尔》 [7] 《安哥拉》《安圭拉》《南极洲》 [10] “安提瓜” “咸海” “阿根廷” [13] “阿鲁巴” “澳大利亚” “奥地利” [16] “亚速尔群岛” “巴哈马” “巴林” [19] 《孟加拉国》《巴巴多斯》《巴布达》 [22] 《比利时》《伯利兹》《贝宁》 [25] 《不丹》《黑海》《玻利维亚》 [28] “博内尔” “博茨瓦纳” “巴西” [31]“文莱”“保加利亚”“布基纳法索” [34] “布隆迪” “加利福尼亚” “柬埔寨” [37] 《喀麦隆》《加拿大》《加那利群岛》 [40] 《佛得角》《里海》《开曼群岛》 [43] 《中非共和国》《乍得》《查戈斯群岛》 [46] 《智利》《中国》《哥伦比亚》 [49] “科摩罗” “刚果” “库克群岛” [52] “哥斯达黎加” “古巴” “库拉索” [55] “塞浦路斯” “捷克斯洛伐克” “丹麦” [58] 《吉布提》《多米尼克》《多米尼加共和国》 [61] “厄瓜多尔” “埃及” “萨尔瓦多” [64] 《赤道几内亚》《埃塞俄比亚》《福克兰群岛》 [67] 《斐济》《芬兰》《法国》 [70]“法属圭亚那”“法属波利尼西亚”“加蓬” [73] 《冈比亚》《加沙地带》《德国》 [76] 《加纳》《大苦湖》《大湖》 [79] “希腊” “格陵兰” “格林纳达” [82] “瓜德罗普” “危地马拉” “几内亚” [85] "几内亚比绍" "圭亚那" "海地" [88] “夏威夷” “洪都拉斯” “匈牙利” [91] “冰岛” “印度” “印度尼西亚” [94] “伊朗”“伊拉克”“爱尔兰” [97]“伊里安查亚”“马恩岛”“怀特岛” [100]“以色列”“意大利”“象牙海岸” [103]“牙买加”“日本”“约旦” [106]“肯尼亚”“基里巴斯”“科威特” [109] “Lacul Greaca” “艾伯特湖” “Fjerritslev 湖” [112]“卡里巴湖”“马拉维湖”“帕斯维克洛夫湖” [115] 《坦噶尼喀湖》《的的喀喀湖》《维多利亚湖》 [118] 《老挝》《黎巴嫩》《莱索托》 [121] “利比里亚” “利比亚” “列支敦士登” [124]“卢森堡”“马达加斯加”“马德拉群岛” [127]“马拉维”“马来西亚”“马尔代夫” [130]“马里”“马耳他”“马绍尔群岛” [133]“马提尼克岛”“毛格岛”“毛里塔尼亚” [136]“毛里求斯”“墨西哥”“密克罗尼西亚” [139]“摩纳哥”“蒙古”“蒙特塞拉特” [142]“摩洛哥”“莫桑比克”“缅甸” [145]“纳米比亚”“瑙鲁”“尼泊尔” [148] “荷兰”“中立区”“尼维斯” [151]“新喀里多尼亚”“新西兰”“尼加拉瓜” [154]“尼日尔”“尼日利亚”“朝鲜” [157]“北马里亚纳群岛”“挪威”“阿曼” [160]“巴基斯坦”“巴拿马”“巴布亚新几内亚” [163]“西沙群岛”“巴拉圭”“秘鲁” [166]“菲律宾”“皮特凯恩群岛”“波兰” [169]“葡萄牙”“波多黎各”“卡塔尔” [172]“罗马尼亚”“卢旺达”“圣尤斯特歇斯” [175] “圣基茨”“圣卢西亚”“圣文森特” [178] “圣巴泰勒米” “圣马丁” “萨摩亚” [181]“圣马力诺”“圣多美和普林西比”“撒丁岛” [184]“沙特阿拉伯”“塞内加尔”“塞舌尔” [187] 《西西里岛》《塞拉利昂》《辛考岛》 [190]“所罗门群岛”“索马里”“索索罗尔岛” [193] 《南非》《韩国》《南桑威奇群岛》 [196] 《西班牙》《南沙群岛》《斯里兰卡》 [199] 《苏丹》《苏里南》《斯威士兰》 [202] 《瑞典》《瑞士》《叙利亚》 [205]“坦桑尼亚”“泰国”“多巴哥” [208]“多哥”“托克劳”“汤加” [211]“特立尼达”“突尼斯”“土耳其” [214]“特克斯和凯科斯”“图瓦卢”“乌干达” [217]“英国”“阿拉伯联合酋长国”“乌拉圭” [220]“美国”“苏联”“瓦努阿图” [223]“委内瑞拉”“越南”“维尔京群岛” [226]“维斯林斯基扎利夫”“威尔士”“西岸” [229]“西撒哈拉”“也门”“南斯拉夫” [232]“扎伊尔”“赞比亚”“津巴布韦”