问我必须为使用R的哥伦比亚地址地理编码设置的完整输入是什么？

EN

dist.pairs <- readxl::read_excel("INFORME CONTRATO.XLSX", 
                                  sheet = NULL) 
dist.pairs$id <- 1:nrow(dist.pairs)

set_key(api_key = "KEY")
names(dist.pairs)

# "label": "5 Rue Daunou, 75002 Paris, France",
# "countryCode": "FRA",
# "countryName": "France",
# "stateCode": "IDF",
# "state": "Île-de-France",
# "county": "Paris",
# "city": "Paris",
# "district": "2e Arrondissement",
# "street": "Rue Daunou",
# "postalCode": "75002",
# "houseNumber": "5"

dist.pairs$country <- "Colombia" 
dist.pairs <- dist.pairs %>%                         
                  unite(fulladdress,                                                Dirección, Ciudad, Departamento, country,    
                         sep = ", ",                       
                         remove = F,                       
                         na.rm = T)                       

dist.pairs$geo.id <- 1:nrow(dist.pairs)

  split.timer <- Sys.time()

  dist.pairs.geocode <- geocode(address = dist.pairs$fulladdress) %>%       
                  mutate(Check.geo.id = dist.pairs$geo.id[id]) %>%   
                  mutate(Lat = st_coordinates(.)[,2], 
                         Lon = st_coordinates(.)[,1],                   
                         Found = TRUE) %>%       
                  select(Check.geo.id, Found, everything()) %>%         
                  st_drop_geometry(.)                            
  
  names(dist.pairs.geocode) <- ifelse(
                               substr(names(dist.pairs.geocode),1,5)=="Check",
                               names(dist.pairs.geocode),
                               paste0("Geocode_",names(dist.pairs.geocode))
                               )
    dist.pairs <- dist.pairs %>% 
                    left_join(x = ., 
                              y = dist.pairs.geocode, 
                              by = c("geo.id" = "Check.geo.id")) %>% 
                    mutate(Geocode_Found = ifelse(!is.na(Geocode_Found), T, F)) %>% 
                    select(-Geocode_id)
  
  print(paste0("Time taken to geocode: ",round(Sys.time()-split.timer,2)))