Generate a map

Load in Leflet and generate a map tile.

library(leaflet)
map <- leaflet() %>% addTiles()

Add placet to display the map.

interesting_places<-data.frame(
    latitude=35.6030413,
    longitude=140.1334927,
    name=c("Chiba University Hospital"))

And put them on the map

map <- interesting_places %>% leaflet() %>% addTiles() %>% addMarkers(popup =interesting_places$name,clusterOptions = markerClusterOptions())
## Assuming "longitude" and "latitude" are longitude and latitude, respectively

And show said map

map