7

我正在使用包mapdata使用此代码,但是它只显示我选择的三个国家,我看不到世界其他地区的地图边界。

map("world", 
    regions=c("ethiopia", "kenya", "uganda"), 
    exact = TRUE, 
    fill=TRUE, 
    col=c(1,2,3))

如何在突出显示我选择的三个国家的同时显示世界其他地区的地图边界?

4

1 回答 1

10

这是一个没有 rworldmap 的示例:

require(mapdata)

# get the names
cc <- map('world', names = TRUE, plot = FALSE)
take <- unlist(sapply(c("ethiopia", "kenya", "uganda"), grep, tolower(cc), value = TRUE))

# world
map()
# add the selected countries in grey to the plot
map('world', regions=take, fill=TRUE, col='grey50', add = TRUE)

在此处输入图像描述

于 2013-04-02T21:11:13.723 回答