Leaflet assignment

My commute is way too long. Any ideas folk out there? :)

library(leaflet)

## Warning: package 'leaflet' was built under R version 3.4.2

my_map <- leaflet() %>% addTiles() 
my_map <- my_map %>% addMarkers(lat=39.027969, lng= -77.4112127, popup="My Work")
my_map <- my_map %>% addMarkers(lat=38.791209, lng= -77.2945907, popup="My Home")
my_map