Interactive Map

Welcome to #30DayMapChallenge 2021 day 25

Published

November 25, 2021

Overview

Leaflet Map of My birthplace: Rome.

Load packages

library(dplyr)
library(ggplot2)
library(rjson)
library(jsonlite)
library(leaflet)
library(RCurl)

interactive <- 
  leaflet() %>%
  #addTiles() %>%  # use the default base map which is OpenStreetMap tiles
  addProviderTiles("Stamen.Terrain") %>%
  addMarkers(lng=12.493569397016822, lat=41.894753434569274,
             popup="My Birthplace")



htmlwidgets::saveWidget(widget=interactive,
           file="interactive.html",
           selfcontained=TRUE)