В буклете для R я не могу воспроизвести стандартный пример, иллюстрирующий работу значков - PullRequest
0 голосов
/ 09 ноября 2019

Это один из наиболее распространенных примеров листовок. Но когда я запускаю этот код, я не вижу красных и зеленых значков листьев в океане или в своей легенде, я вижу синие квадраты с вопросительными знаками. Фоновая карта верна, хотя.

library(leaflet)

# Sample Data
data(quakes)
quakes <- quakes[1:10,]

# Choose Icon:
leafIcons <- icons(
  iconUrl = ifelse(quakes$mag < 4.6,
                   "http://leafletjs.com/docs/images/leaf-green.png",
                   "http://leafletjs.com/docs/images/leaf-red.png"
  ),
  iconWidth = 38, iconHeight = 95,
  iconAnchorX = 22, iconAnchorY = 94)

html_legend <- "<img src='http://leafletjs.com/docs/images/leaf-green.png'>green<br/>
<img src='http://leafletjs.com/docs/images/leaf-red.png'>red"

# Produce Map:
leaflet(data = quakes) %>% addTiles() %>%
  addMarkers(~long, ~lat, icon = leafIcons) %>%
  addControl(html = html_legend, position = "bottomleft")
...