@@ -2,7 +2,7 @@
library(janitor)
library(dplyr)
#library(ggmap)
-library(nominatim)
+library(photon)
library(readr)
source("osm_api.R")
Geo2017 <- clean_names(read_csv("data/AllDHBsGeocoded.csv"), case = "snake") %>%