Làm nổi bật các quốc gia cụ thể (Ethiopia, Uganda, Kenya) sử dụng thư viện rworldmap và chức năng bản đồ

Question

Tôi đang sử dụng mã này bằng gói mapdata, tuy nhiên nó chỉ hiển thị ba quốc gia mà tôi đã chọn và tôi không thể thấy phần còn lại của ranh giới bản đồ thế giới.

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

Làm cách nào để hiển thị phần còn lại của ranh giới bản đồ trên thế giới trong khi làm nổi bật ba quốc gia đã chọn của tôi?

Answer 1

Dưới đây là một ví dụ mà không 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)