Как выделить места на tmap в R?
Я пытаюсь использовать tm_text для добавления текста для определения местоположения на карте с помощью пакета tmap в R.
Это код, который я использовал для создания своей карты:
library(tmap)
library(spData)
tm_shape(nz) +
tm_fill("Population") +
tm_borders() +
tm_layout(basemaps = leaflet::providers$Esri.WorldTopoMap)
Я не могу найти другую базовую карту, на которой были бы отмечены интересующие меня места на карте, поэтому мне было интересно, есть ли способ наложения текста на определенные области?
Например, на изображении ниже я хотел бы добавить текст, чтобы выделить центральный район Хоукс-Бей и Палмертон-Норт.
Ответы 1
Чтобы добавить текст на карту tmap с помощью вызова tm_text(), вам нужны две вещи — метка и местоположение.
С небольшой помощью карт Google я нашел координаты Палмерстон-Норт и Центральной Хокс-Бей (никогда не слышал ни о том, ни о другом :), и я предлагаю следующее решение:
library(tmap)
library(spData)
library(sf)
points <- data.frame(name = c("Central Hawke's Bay", "Palmerston North"),
x = c(176.474193, 175.611667),
y = c(-39.922303, -40.355),
stringsAsFactors = F)
points <- st_as_sf(points, coords = c("x", "y"), crs = 4326)
tmap_mode("view")
tm_shape(nz) +
tm_fill("Population") +
tm_borders() +
tm_shape(points) + tm_text("name") +
tm_basemap(leaflet::providers$Esri.WorldTopoMap)
Я включил библиотечный вызов {sf}, чтобы упростить преобразование координат как числа во фрейм пространственных данных. Я также немного изменил ваш вызов {tmap}, чтобы он соответствовал современным передовым методам работы с tmap.
Рад помочь :)