library(leaflet)
my_map <- leaflet() %>%
  addTiles() %>%
addMarkers(lat=43.642567, lng=-79.387054, popup = "CN Tower")

my_map

##My Map

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

Markers

library(leaflet)
my_map <- my_map %>%
  addMarkers(lat=43.642567, lng=-79.387054, 
             popup = "CN Tower")
my_map <- my_map %>%
  addMarkers(lat = 43.6424, lng = -79.3860,
             popup = "Ripley's Aquarium")
my_map