updated MV location info

NBISweden · Jan 21, 2025 · 3ac4cbe · 3ac4cbe
1 parent 87f71b7
commit 3ac4cbe
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/_child-info.qmd b/_child-info.qmd
@@ -0,0 +1,12 @@
+```{r}
+#| echo: false
+icons <- awesomeIcons(icon = dfr2$marker_icon, markerColor = dfr2$marker_color, iconColor = "#FFFFFF", library = "fa")
+
+htmltools::div(
+  style = "margin-bottom:1em;",
+  htmltools::tagList(leaflet(height = 450, width = "auto", elementId = paste0("leaflet-", p)) %>%
+    addTiles(urlTemplate = "http://{s}.tile.openstreetmap.org/{z}/{x}/{y}.png") %>%
+    addAwesomeMarkers(lat = dfr2$lat, lng = dfr2$lon, label = dfr2$label, popup = dfr2$popup, icon = icons) %>%
+    setView(lat = dfr2$lat[1], lng = dfr2$lon[1], zoom = 13))
+)
+```