Ответы:
Если мы посмотрим ?bordersи, более подробно ?map, мы увидим, что мы можем использовать regionsаргумент:
ggplot() + borders(regions = "Denmark", colour = "gray50", fill = "gray50")
+ geom_point(data = data.frame(x = 12, y = 56), aes(x = x, y = y))добавляет точку.
coord_cartesian(), чтобы масштаб осей x и y совпадал.
Получите границы Дании в лат-лонг и используйте coord_fixed:
ggplot() + borders("world", colour="gray50", fill="gray50") + coord_fixed(xlim=c(7, 12), ylim=c(52, 58))
Вы можете получить оценки из mapпакета:
> map("world", "Denmark", plot=FALSE)$range
[1] 8.121484 15.137110 54.628857 57.736916
И вы, возможно, захотите немного расширить их для лучшего расстояния и большего контекста.
map("world","Denmark")производить карту Дании? Что насчет "Франции" или "Бельгии"? Используются ли местные названия стран («Danmark»)? Рисует map("world")карту? Есть ли map("world",plot=FALSE)$namesвозвращать вектор имен страны / региона? Если они не работают, то это очень странно, и вы должны задать новый вопрос или сообщить об ошибке ...
library(maps), затем попробуйте? Может быть, у вас есть что-то маскирующее maps::mapфункцию. Наверное purrr::map? Не используйте library(tidyverse).
l <- leaflet() %>% setView(lat = 50.85045, lng = 4.34878, zoom=5) %>% addTiles(group="OSM")