Chapitre 9 Exercice 6 : les données majic
Calculer à partir des tables fournies dans le fichier majic.RData
issues des fichiers fonciers (cf. http://piece-jointe-carto.developpement-durable.gouv.fr/NAT004/DTerNP/html3/_ff_descriptif_tables_image.html#pnb10) un indicateur d’étalement urbain entre 2009 et 2014 à la commune et à l’EPCI sur la région Pays de la Loire (départements 44, 49, 53, 72 et 85), et catégoriser chaque territoire.
Définitions :
- artificialisation = dcnt07 + dcnt09 + dcnt10 + dcnt11 + dcnt12 + dcnt13
- indicateur_etalement_simple = évolution de l’artificialisation / évolution de la population
- indicateur_etalement_avance, indicateur catégoriel qui vaut :
- 1 si la population progresse ou reste stable alors que l’artificialisation recule ;
- 2a si la population et l’artificialisation progressent ou sont stables et l’étalement urbain est inférieur ou égal à 1 (ou pop stable) ;
- 2b si la population et l’artificialisation reculent et l’indicateur d’étalement urbain est supéreur à 1 ;
- 2c si la population recule et l’indicateur d’étalement est compris entre 0 et 1 (inclus) ;
- 3 si la population progresse, l’artificialisation progresse plus vite que la population, tout en restant inférieure ou égale à 4,9 m² ;
- 4 si la population progresse, l’artificialisation est supérieure à 4,9 m², elle progresse plus vite que la population mais au plus 2 fois plus vite ;
- 5 si la population progresse, l’artificialisation progresse plus de 2 fois plus vite que la population et est supérieure à 4,9 m² ;
- 6 si la population recule et l’indicateur d’étalement urbain est négatif.
- 1 si la population progresse ou reste stable alors que l’artificialisation recule ;
Résultats attendus :
Résultat attendu : création de l’indicateur artificialisation
pour les deux millésimes de majic (solution COGiter)
## Rows: 1,304
## Columns: 4
## $ TypeZone <fct> Communes, Communes, Communes, Communes, Communes, Communes,…
## $ Zone <fct> "Abbaretz", "Aigrefeuille-sur-Maine", "Ancenis-Saint-Géréon…
## $ CodeZone <fct> 44001, 44002, 44003, 44005, 44006, 44007, 44009, 44010, 440…
## $ artif_2009 <dbl> 3064748, 2408844, 6859785, 6101987, 2379588, 3042688, 50259…
## Rows: 1,304
## Columns: 4
## $ TypeZone <fct> Communes, Communes, Communes, Communes, Communes, Communes,…
## $ Zone <fct> "Abbaretz", "Aigrefeuille-sur-Maine", "Ancenis-Saint-Géréon…
## $ CodeZone <fct> 44001, 44002, 44003, 44005, 44006, 44007, 44009, 44010, 440…
## $ artif_2014 <dbl> 3160057, 2485622, 7103107, 6496868, 2419875, 3105298, 52452…
Résultat attendu : création de les indicateurs pop_2009
et pop_2014
pour les deux millésimes de majic (solution COGiter)
## Rows: 1,304
## Columns: 4
## $ TypeZone <fct> Communes, Communes, Communes, Communes, Communes, Communes, C…
## $ Zone <fct> "Abbaretz", "Aigrefeuille-sur-Maine", "Ancenis-Saint-Géréon",…
## $ CodeZone <fct> 44001, 44002, 44003, 44005, 44006, 44007, 44009, 44010, 44012…
## $ pop_2009 <dbl> 1909, 3214, 10639, 5894, 1810, 2465, 8265, 3185, 2595, 2591, …
## Rows: 1,302
## Columns: 4
## $ TypeZone <fct> Communes, Communes, Communes, Communes, Communes, Communes, C…
## $ Zone <fct> "Abbaretz", "Aigrefeuille-sur-Maine", "Ancenis-Saint-Géréon",…
## $ CodeZone <fct> 44001, 44002, 44003, 44005, 44006, 44007, 44009, 44010, 44012…
## $ pop_2014 <dbl> 2042, 3714, 10783, 6680, 1830, 2601, 8747, 3086, 2769, 2927, …
Résultat attendu : jointude implicite sur idcom
et création de l’indicateur d'étalement urbain
(solution COGiter) :
## Rows: 1,304
## Columns: 11
## $ TypeZone <fct> Communes, Communes, Communes, Communes, Co…
## $ Zone <fct> "Abbaretz", "Aigrefeuille-sur-Maine", "Anc…
## $ CodeZone <fct> 44001, 44002, 44003, 44005, 44006, 44007, …
## $ artif_2009 <dbl> 3064748, 2408844, 6859785, 6101987, 237958…
## $ artif_2014 <dbl> 3160057, 2485622, 7103107, 6496868, 241987…
## $ pop_2009 <dbl> 1909, 3214, 10639, 5894, 1810, 2465, 8265,…
## $ pop_2014 <dbl> 2042, 3714, 10783, 6680, 1830, 2601, 8747,…
## $ evoarti <dbl> 3.109847857, 3.187337993, 3.547079099, 6.4…
## $ evopop <dbl> 6.966998, 15.556938, 1.353511, 13.335596, …
## $ ies <dbl> 0.446368388, 0.204882086, 2.620651010, 0.4…
## $ indicateur_etalement_avance <chr> "2a", "2a", "3", "2a", "3", "2a", "2a", "6…
Résultat attendu pour etalement_urbain_commune
:
## Rows: 1,232
## Columns: 11
## $ TypeZone <fct> Communes, Communes, Communes, Communes, Co…
## $ Zone <fct> "Abbaretz", "Aigrefeuille-sur-Maine", "Anc…
## $ CodeZone <fct> 44001, 44002, 44003, 44005, 44006, 44007, …
## $ artif_2009 <dbl> 3064748, 2408844, 6859785, 6101987, 237958…
## $ artif_2014 <dbl> 3160057, 2485622, 7103107, 6496868, 241987…
## $ pop_2009 <dbl> 1909, 3214, 10639, 5894, 1810, 2465, 8265,…
## $ pop_2014 <dbl> 2042, 3714, 10783, 6680, 1830, 2601, 8747,…
## $ evoarti <dbl> 3.109847857, 3.187337993, 3.547079099, 6.4…
## $ evopop <dbl> 6.966998, 15.556938, 1.353511, 13.335596, …
## $ ies <dbl> 0.446368388, 0.204882086, 2.620651010, 0.4…
## $ indicateur_etalement_avance <chr> "2a", "2a", "3", "2a", "3", "2a", "2a", "6…
Résultat attendu pour etalement_urbain_epci
:
## Rows: 71
## Columns: 11
## $ TypeZone <fct> Epci, Epci, Epci, Epci, Epci, Epci, Epci, …
## $ Zone <fct> "CC du Pays de Pontchâteau St-Gildas-des-B…
## $ CodeZone <fct> 200000438, 200023778, 200033298, 200040475…
## $ artif_2009 <dbl> 27594293, 44299964, 25161639, 24880690, 16…
## $ artif_2014 <dbl> 28629232, 46277932, 26955382, 25836264, 18…
## $ pop_2009 <dbl> 31965, 45278, 27906, 18370, 17608, 29131, …
## $ pop_2014 <dbl> 35112, 48610, 28168, 19004, 17017, 29304, …
## $ evoarti <dbl> 3.750555, 4.464943, 7.128880, 3.840625, 7.…
## $ evopop <dbl> 9.8451431, 7.3589823, 0.9388662, 3.4512793…
## $ ies <dbl> 0.3809548, 0.6067337, 7.5930733, 1.1128120…
## $ indicateur_etalement_avance <chr> "2a", "2a", "5", "3", "6", "3", "5", "2a",…
Résultat attendu pour le graphique (vu au M5) :