require( tidyverse)
register_google( "AIzaSyCFbCIT-LGAxPGbBfJPCGInplv3bEJOe_M")
datos_hosp <- read_delim( "/data_raw/directorio_hospitales/catalogo_hospitales.csv",
delim = ";",
locale = readr::locale(encoding = "UTF-8")) %>%
mutate_geocode( direccion_completa, source = "google")