knitr::opts_chunk$set(echo = TRUE) library(eptb2022)
Choix de l année d étude par défaut 2019
fn01_choix_annee_etude(2018)-> ls_dates print(paste0("L'année d'étude est ", ls_dates$annee_etude))
Cree les repertoires 1_script, 2_data, 3_tables, 4_resultats, 5_publication
fn02_cree_repertoires() print("Les répertoires ont été créés dans le projet")
fn03_import_tab_beyond() -> ls_beyond fn04_import_tableaux_geokit()-> ls_import if(exists("ls_beyond")==TRUE&exists("ls_beyond")==TRUE)print("Les données ont été importées")
fn05_transforme_tab_gk_filtre_frregdep()-> tli_regdep_filtre fn07_cree_doc_frcordep_filtre()-> doc_frcordep_filtre fn09_extrait_tab_filtre_modalites()-> tli_reg_indics_filtre fn10_tab_filtre_verifie_secstat()-> tli_reg_indics_filtre fn11_tab_filtre_applique_secstat()-> tab2_terrains print("Données pour les terrains traitées")
fn12_transforme_tab_gk_ssfiltre_frregdep()-> tli_regdep_ssfiltre fn13_cree_doc_frcordep_ssfiltre()-> doc_frcordep_ssfiltre fn15_extrait_tab_ssfiltre_modalites()-> tli_reg_indics_ssfiltre fn16_tab_ssfiltre_verifie_secstat()-> tli_reg_indics_ssfiltre fn17_tab_ssfiltre_applique_secstat()-> tab4_maisons print("Données pour les maisons traitées")
fn18_calcul_evolution_maisons_terrains()-> tli_frcordepcor_filtre_ssfiltre fn19_calcul_evolution_maisons_terrains_mod(tli_frcordepcor_filtre_ssfiltre$evol_an)-> tli_frcordepcor_filtre_ssfiltre$evol_an print("Données pour les terrains et maisons traitées")
fn30_carto_terrains_indics(tli_regdep_filtre[["filtre_reg"]])-> plot_ls_carto # fn31_carte_maisons(tli_regdep_ssfiltre[["filtre_reg"]]) fn32_graphiques_terrains()-> ls_cowplot fn33_graphiques_maisons()-> ls_cowplot fn33b_cowplot_maison_terrain() fn34_autres_graphiques_terrains() fn35_autres_graphiques_maisons() print("Cartographies et graphiques réalisés")
fn20_mef_tableaux_plaquette()-> resultats fn21_enregistre_tableaux()-> tab_calculs résultats2 <- resultats print("Tableaux pour la plaquette réalisés")
fn40_scr_lit_nouveau_texte()-> ls_newtxt print("Nouveau texte mis en forme")
fn41_lit_le_modele()-> ls_modele print("lecture du texte du modèle ok")
fn42_remplace_txt_paragraphe() fn42b_remplace_txt_titre() print("Remplacement de l'ancien texte du modèle par le nouveau réalisé")
fn43_lit_contenu_tableaux() -> ls_tableaux0 fn44_tableaux_cellule_a_remplacer()-> toto fn45_tableaux_remplace_corps_tableau() fn46_tableaux_met_en_forme_champs() fn47_tableaux_met_en_forme_ssindicateurs() print("Mise à jour des tableaux réalisée")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.