Sto provando ad aggiungere una mappa di Leaflet con tile a una representjs_presentation creata in R. Questa mappa viene visualizzata correttamente nel formato ioslide o html, ma non nel formato revealjs_presentation (problemi principali: tutti i caratteri sono troppo grandi e la mappa ha strani artefatti attorno ai confini dei poligoni quando selezionata). Poiché la mappa funziona bene in altri formati di output, sospetto che il problema abbia a che fare con un qualche tipo di incompatibilità CSS tra revealjs_presentation e volantino.Incorporare la mappa di Leaflet nella presentazione di revealjs all'interno di R
Per isolare i due set di codice, ho salvato la mappa del volantino utilizzando htmlwidgets. Questa mappa sembra soddisfacente, ma sembra che non ci sia modo di incorporare questo file html locale all'interno della presentazione usando, ad esempio, un iframe. Dato che non sono un esperto di CSS, apprezzerei qualsiasi guida su come risolvere questo problema. Se qualcuno ha prodotto una mappa illustrativa interattiva con popup che viene visualizzata correttamente nel formato revealjs_presentation in R, sarei grato di vedere una parte di quel codice. Per quello che vale, il codice mappa opuscolo è:
leaflet(x) %>%
addPolygons(popup = popup, weight = 0.7, fillColor = ~pal(quintf),
color = 'white', fillOpacity = 1, opacity = 1,
smoothFactor = 0.8) %>%
addLegend(pal = pal, values = x$quintf, title = "CXI Activity",
position = 'bottom right')
Questo file consente di risparmiare in modo corretto (per esempio il codice qui sotto), ma fa riferimento a esso in un iframe rompe la natura autonoma del file HTML a maglia.
saveWidget(m, file="map.html")