different geocoding

scratch.R

@@ -45,4 +45,6 @@ gp_new <- filter(gp_prac, is.na(gp_prac$calculated_address)) %>%
 table(newFacil$facility_type_name)
 table(Geo2017$facility_type_name)
 
-newcoded <- osm_geocode(gp_new$address[1:5])
+# newcoded <- osm_geocode("21 Ruakura Road, Hamilton East, Hamilton 3216")
+
+newcoded <- geocode(gp_new$address, limit = 1)