R Markdown and Leaflet

Load Libraries

library(knitr)
library(leaflet)

Leaflet and Map

sights <- data.frame(lat=c(48.1584,48.1355,48.0971,48.1388,48.1375,48.1300,48.1644),lng=c(11.5038,11.5762,11.5539,11.5735,11.5759,11.5843,11.6062),name=c("Nymphenburg Palace","Viktualienmarkt","Hellabrunn Zoo","Frauenkirche","Marienplatz","German Museum","English Garden"))
map <- sights %>% leaflet() %>% addTiles() %>% addMarkers(popup =sights$name,clusterOptions = markerClusterOptions())

## Assuming "lng" and "lat" are longitude and latitude, respectively

map