data-raw/departement.R

## cdownload.file('ftp://Admin_Express_ext:Dahnoh0eigheeFok@ftp3.ign.fr/ADMIN-EXPRESS-COG_2-1__SHP__FRA_WGS84_2020-03-25.7z.001', destfile = 'test.7z.001', method = 'curl', extra = '-L')

# departement <- sf::read_sf('./donnees/ADMIN-EXPRESS-COG/DEPARTEMENT.shp') %>%
#   dplyr::filter(nchar(INSEE_DEP) == 2)
#
# usethis::use_data(departement, overwrite = TRUE)
Guillaume-Lombardo/prenom documentation built on May 27, 2020, 4:04 p.m.