data-prod/Etudes_Cas/Etude_CasB_RQAM.R

In INESSS-QC/admissibilite1: Admissibilité des individus

library(admissibilite1)

fromAF = 2007L
toAF = 2016L
DT <- import_struct(  # importation des AF nécessaires
  database = "RQAM",
  DebutEtude = paste0(fromAF,"-04-01"),
  FinEtude = paste0(toAF+1,"-03-31")
)
obj1 <- admis_analyse(DT)
obj2 <- admis_analyse2(obj1)
list_result <- list(Obj1 = obj1, Obj2 = obj2)  # sauvegarder résultat dans liste
saveRDS(
  list_result,
  paste0(
    "V:/GI-Data/_ADMIS/R data/Etudes_Cas/",
    "EtudeB_RQAM_AF",fromAF,"-",toAF,"_",
    Sys.Date(),
    ".rds"
  )
)