我想用R来生成一个非常基本的世界地图,其中一组特定的国家用红色填充,表明它们是疟疾流行国家。
我在数据框中列出了这些国家/地区,但我很难将它们叠加在世界地图上。
我尝试使用wrld_simpl
对象以及joinCountryData2Map
包中的rworldmap
方法。
我会评论这个答案,以防止增加一个可能多余的问题,但我目前没有足够的声誉,为此道歉。
https://stackoverflow.com/a/9102797/1470099
我很难理解plot()
命令的参数 - 我想知道是否只有一种简单的方法可以告诉R在wrld_simpl
地图上列出我列表中的所有国家/地区名称而不是使用grepl()
等等。
plot(wrld_simpl,
col = c(gray(.80), "red")[grepl("^U", wrld_simpl@data$NAME) + 1])
答案 0 :(得分:20)
使用rworldmap
包,您可以使用以下内容:
library(rworldmap)
theCountries <- c("DEU", "COD", "BFA")
# These are the ISO3 names of the countries you'd like to plot in red
malDF <- data.frame(country = c("DEU", "COD", "BFA"),
malaria = c(1, 1, 1))
# malDF is a data.frame with the ISO3 country names plus a variable to
# merge to the map data
malMap <- joinCountryData2Map(malDF, joinCode = "ISO3",
nameJoinColumn = "country")
# This will join your malDF data.frame to the country map data
mapCountryData(malMap, nameColumnToPlot="malaria", catMethod = "categorical",
missingCountryCol = gray(.8))
# And this will plot it, with the trick that the color palette's first
# color is red
编辑:添加其他颜色并包含图片
## Create multiple color codes, with Burkina Faso in its own group
malDF <- data.frame(country = c("DEU", "COD", "BFA"),
malaria = c(1, 1, 2))
## Re-merge
malMap <- joinCountryData2Map(malDF, joinCode = "ISO3",
nameJoinColumn = "country")
## Specify the colourPalette argument
mapCountryData(malMap, nameColumnToPlot="malaria", catMethod = "categorical",
missingCountryCol = gray(.8), colourPalette = c("red", "blue"))
答案 1 :(得分:12)
尝试使用googleVis包并使用gvisGeoMap函数
e.g。
G1 <- gvisGeoMap(Exports,locationvar='Country',numvar='Profit',options=list(dataMode='regions'))
plot(G1)
答案 2 :(得分:6)