## 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)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.