My First Leaflet Map

library(leaflet)

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

library(tidygeocoder)

## Warning: package 'tidygeocoder' was built under R version 4.4.3

library(dplyr)

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

leaflet() %>%
  addTiles() %>%
  setView(lng = -81.7052, lat = 41.4932, zoom = 15) %>%
  addMarkers(lng = -81.7052, lat = 41.4932, popup = "2222 Detroit Ave, Cleveland, OH")

home_df <- tibble(address = "2222 Detroit Ave, Cleveland, OH") %>% 
  geocode(address, method = 'osm')  

## Passing 1 address to the Nominatim single address geocoder

## Query completed in: 1 seconds