Простая карта мира с выделенными странами и выбранными городами - PullRequest
1 голос
/ 17 апреля 2019

Я хотел бы нарисовать карту мира и выделить отдельные страны и города. Страны и города представят места, где были получены данные исследования. К сожалению, я смог сделать это. Я мог только выделить страны. Как я могу добавить города, как они показаны в пурпурном, и, в конечном итоге, названия городов или стран?

library(maptools)
data(wrld_simpl)

lat<-c(7,13.3,12,46,38,52.31)
lon<-c(6,16,105,2,23.7,13.23)
cities<-data.frame(lat,lon)
myCountries = wrld_simpl@data$NAME %in% c("Australia",  "Germany",  "Sweden", "Austria")
plot(wrld_simpl, col = c(gray(.90), "red")[myCountries+1])

enter image description here

1 Ответ

1 голос
/ 17 апреля 2019

Самый простой способ отсюда будет:

cities <- coordinates(cities)

plot(wrld_simpl, col = c(gray(.90), "red")[myCountries+1])
points(cities, col = "purple", lwd = 7)

Однако, если вам нужно изменить свою карту в любой точке (например, для перепроектирования / преобразования точек), вам, вероятно, придется посмотреть наиспользуя векторные геометрии и sf / rgdal: https://r -spatial.github.io / sf /

...