Как добавить сетку указанного расстояния на карту листовки в R - PullRequest
Новая
       28

Как добавить сетку указанного расстояния на карту листовки в R

0 голосов
/ 14 мая 2019

Как мы можем добавить сетку с небольшим разрешением указанного расстояния (например, 1 км или 1 милю) к карте листовки в R?

Я пробовал следующее: 

library(leaflet)

# This is pretty slow...
leaflet() %>%
  addTiles() %>%
  setView(-95, 40, 14) %>% 
  addGraticule(
    interval = 1 / 69,
    group = "Graticule"
  ) %>% 
  addLayersControl(
    overlayGroups = c("Graticule"),
    options = layersControlOptions(collapsed = FALSE)
  )

Я также пробовал это: 

# This is faster, but...
# The labels are not rounded. 
# Can the labels be adjusted/rounded and/or removed (?)
leaflet() %>%
  addTiles() %>%
  setView(-95, 40, 14) %>% 
  addSimpleGraticule(
    interval = 1 / 69,
    group = "Graticule"
  ) %>% 
  addLayersControl(
    overlayGroups = c("Graticule"),
    options = layersControlOptions(collapsed = FALSE)
  )

Example

Обсуждение и вопросы:

  1. И addGraticule, и addSimpleGraticule добавляют сетку на основе расстояния в градусах .Может ли это основываться на метрических (км) или имперских (милях) единицах вместо этого?
  2. Существует ли эффективный способ сделать это на небольших расстояниях?
  3. Можно ли удалить метки с addSimpleGraticule?
...