There have been examples suggesting that integrating SVG graphics into Leaflet popups is achievable, such as this one: seeking examples of SVG graphics in Leaflet popups
Another illustration can be found here: Creating a graph within a leaflet popup using geoJson data
Despite these demonstrations, my recent endeavor to include SVG from the R wrapper for Leaflet was unsuccessful:
library(magrittr)
library(leaflet)
content <- paste(sep = '<body>'
,'<svg height="100" width="100">'
,'<circle cx="50" cy="50" r="40" stroke="black" stroke-width="3" fill="red" />'
,'Sorry, your browser does not support inline SVG.'
,'</svg>'
,'</body>'
)
leaflet() %>%
addTiles() %>%
addPopups(-122.327298
,47.597131
,content
,options = popupOptions(closeButton = FALSE)
)
Inquiry: Can SVG indeed be integrated into Leaflet popups using R?