library(dplyr, warn.conflicts = FALSE)
library(tidygeocoder)

# create a dataframe with addresses
some_addresses <- tibble::tribble(
  ~name,                  ~addr,
  "White House",          "1600 Pennsylvania Ave NW, Washington, DC",
  "Transamerica Pyramid", "600 Montgomery St, San Francisco, CA 94111",     
  "Willis Tower",         "233 S Wacker Dr, Chicago, IL 60606",
  "Rob",                  "863 Tartan Dr, Venice, FL 34293"
)

# geocode the addresses
lat_longs <- some_addresses %>%
  geocode(
    addr, 
    method = 'google', 
    lat = latitude , 
    long = longitude
)
# 
#