so_ii_catchment.R

# code to prepare `so_ii_catchment` dataset goes here

file_dir = geau::current_version(
    "data-common/so-ii/topage",
    pattern = "^[0-9-]+$"
)
so_ii_catchment = sf::st_read(file.path(file_dir, "bassin_versant.shp"))
names(so_ii_catchment) = c("id", "catchment_name", "degre", "geometry")
Encoding(so_ii_catchment[["catchment_name"]]) = "UTF-8"
so_ii_catchment[["degre"]] = factor(so_ii_catchment[["degre"]])

# updating datasets

actual = setwd("geau")
usethis::use_data(so_ii_catchment, internal = FALSE, overwrite = TRUE)
setwd(actual)