generated from BioDataScience-Course/A06Ia_belgium_demo
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathbelgium_notebook.qmd
145 lines (106 loc) · 5.52 KB
/
belgium_notebook.qmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
---
title: "Évolution de la démographie en Belgique"
author: "___"
date: "`r Sys.Date()`"
format:
html:
code-fold: true
code-tools: true
toc: true
editor: visual
lang: fr
---
# Introduction et but
L'office belge de statistique Statbel (<https://statbel.fgov.be/fr/propos-de-statbel>) diffuse des données sur l'économie, la société et le territoire. Parmi ces données nous utiliserons celles relatives au recensement de la population dans les trois régions de Belgique. Notre objectif est de décrire la démographie de la population belge au fil des ans.
# Matériel et méthodes
Les données issues du site de Statbel ont été exportées le 3 décembre 2023. Les données brutes ont été en partie remaniées dans le cadre de cet exercice. Les valeurs de démographie par catégorie n'ont pas été modifiées.
L'analyse est réalisée avec le [logiciel R](https://www.r-project.org) (`r R.version.string`) dans la [SciViews Box 2024](https://www.sciviews.org/software/svbox/). [Saturn Cloud](https://saturncloud.io) (Linux Ubuntu 22.04) est utilisé pour exécuter le code et compiler la version finale de ce bloc-notes.
# Analyses
```{r setup, include=FALSE}
# Ceci est nécessaire pour les tests SDD, ne pas utiliser dans un "vrai" projet
if (!"tools:tests" %in% search())
source(here::here("tests/tools_tests.R"), attach(NULL, name = "tools:tests"))
# Configuration de l'environnement SciViews::R
SciViews::R(lang = "fr")
```
## Remaniement des données
Nous importons, combinons et remanions les différents jeux de données.
<!-- Importez les trois tableaux relatifs à la population entre 1992 et 2009 en Région Wallone, en Région flamande et en Région Bruxelles-Capitale. Fusionnez ensuite ces trois tableaux en un seul dans `pop_92`. -->
```{r pop92, record='RODFS', object='pop_92'}
# Region Wallone
rw_92 <- ___
# Région Flamande
rf_92 <- ___
# Région Bruxelles capitale
rb_92 <- ___
# Association des tableaux
pop_92 <- ___
```
<!-- Importez les trois tableaux relatifs à la population entre 2010 et 2023 en Région Wallone, en Région flamande et en Région Bruxelles-Capitale. Fusionnez ensuite ces trois tableaux en un seul dans `pop_10`. -->
```{r pop10, record='RODFS', object='pop_10'}
# Region Wallone
rw_10 <- ___
# Région Flamande
rf_10 <- ___
# Région Bruxelles capitale
rb_10 <- ___
# Association des tableaux
pop_10 <- ___
```
<!-- Fusionnez les tableaux `pop_92` et `pop_10` pour en obtenir un seul nommé `pop`. Modifiez ce dernier en transformant toutes les variables débutant par "population" pour obtenir un tableau long avec, entre autres, une colonne `year` (année de la mesure) et une colonne `n` (nombre d'individus). -->
```{r join, record='RODFS', object='pop'}
# Fusion des deux tableaux
pop <- ___
# Conversion de long à large
pop <- ___
```
<!--% Convertissez la variable `year` en format numérique (astuce : si vous utilisez sseparate() -vous n'êtes pas obligé- indiquer NA pour les colonnes que vous ne souhaitez pas conserver). Modifiez également la variable `n` pour exprimer la population en millions d'individus. -->
```{r mutate, record='RODFS', object='pop'}
# Modification de la variable `year` pour la rendre numérique
# et conversion de `n` en millions d'individus
pop <- ___
```
Les données retravaillées se présentent comme suit :
```{r datafinal, warning=FALSE}
tabularise$headtail(pop)
```
## Description des données
L'augmentation de la population belge entre 1992 et 2023 est représentée ci-dessous.
<!--% Reproduisez à l'identique le graphique ci-dessus. -->
```{r plot1, record='RNCS'}
___
```
<!--% Reproduisez à l'identique le graphique ci-dessus. -->
```{r plot2, record='RNCS'}
___
```
<!--% Interprétez ces deux graphiques. -->
```{r plot2comment, output='asis'}
select_answer(r"-{
[] - La population totale en Belgique a augmenté de plus de 15% en trois décénnies.
[] - Le nombre de femmes est plus élevé que le nombre d’hommes en Région wallonne.
[] - Le nombre de femmes est plus faible que le nombre d’hommes en Région wallonne.
[] - Le nombre de femmes et d’hommes est similaire en Région wallonne.
[] - L’augmentation au cours du temps du nombre de femmes est plus rapide que pour le nombre d’hommes.
[] - L’augmentation au cours du temps du nombre de femmes est plus lente que pour le nombre d’hommes .
[] - L’augmentation au cours du temps du nombre de femmes et d’hommes est similaire.}-")
```
<!--% Reproduisez à l'identique le graphique ci-dessus. -->
```{r plot3, record='RNCS'}
___
```
<!--% Décrivez le graphique en barres réalisé ci-dessus.-->
```{r plot3comment, output='asis'}
select_answer(r"-{
[] - Le nombre total de femmes et d’hommes est similaire dans les différentes régions.
[] - Ce graphique ne permet pas de déterminer si les hommes ou les femmes sont plus nombreux au total dans les différentes régions.
[] - La région la plus peuplée est la Région flamande.
[] - La région la plus peuplée est la Région wallonne.
[] - La région la plus peuplée est la Région de Bruxelles-Capitale.
[] - On retrouve des proportions relatives similaires d’hommes et de femmes dans les trois régions.
[] - On retrouve des proportions relatives différentes entre les hommes et les femmes dans les trois régions. Il y a bien plus d’hommes que de femmes en Région flamande.
[] - On retrouve des proportions relatives différentes entre les hommes et les femmes dans les trois régions. Il y a bien plus d’hommes que de femmes en Région wallonne.}-")
```