Analyse statistique et visualisation portant sur la population et la vaccination
Quel est le portrait mondial de la population protégée?
Doses de vaccins par continents
Show code
plot1 <- ggplot(data = dfVacWorld,
aes(x = as.Date(date), y = total_vaccinations, fill = Continent7))+
geom_col()+
scale_fill_viridis_d(option = "C")+
theme_classic()+
theme(axis.title.x = element_text(family = "Arial"))+
theme(title = element_text(family = "Arial", face = "bold"))+
theme(legend.title = element_text(family = "Arial",face = "bold"))+
theme(legend.box.background = element_rect(size=0.3))+
theme(legend.position = c(.05, .95),
legend.justification = c("left", "top"))+
theme(axis.title.x = element_text(family = "Arial",face = "bold", size = 12))+
theme(axis.title.y = element_text(family = "Arial",size = 12))+
theme(axis.text.x = element_text(family = "Arial",size = 12, angle = 30, hjust = 1))+
theme(axis.text.y = element_text(family = "Arial",size = 12))+
labs(y = "Vaccinations totales",
x = "Date",
title = "Nombre de vaccins par continent",
subtitle = "de la première dose à aujourd'hui",
fill = "Continents")
plot1
Le portrait épidémiologique de la prévention de la covid-19 à l’échelle mondial est certe un sujet délicat, mais il reste qu’il est très intéressant de par son actualité et par sa portée. Ici, il est possible d’observer par continent les quantités de doses administrée depuis la première dose en décembre 2020 jusqu’à aujourd’hui. Il est possible de remarquer que deux continents, l’Afrique et l’Océanie, sont difficilement retraçable sur le graphique dû à leur petit nombre de dose comparés aux autres continent. Il y a bien évidement un effet de population qui varie grandement d’un continent à l’autre, mais il y a ausi des enjeux économiques et sociaux qui influencent ces disparités. Il serait donc intéressant de refaire ce graphique avec une proportion soit la variable de vaccins administrés par 100 habitants.
Vaccins rapportés par 100 habitants
Show code
plot2 <- ggplot(data = dfVacWorld,
aes(x = as.Date(date), y = total_vaccinations_per_hundred, fill = Continent7))+
geom_col()+
scale_fill_viridis_d(option = "C")+
theme_classic()+
theme(axis.title.x = element_text(family = "Arial"))+
theme(title = element_text(family = "Arial", face = "bold"))+
theme(legend.title = element_text(family = "Arial",face = "bold"))+
theme(legend.box.background = element_rect(size=0.3))+
theme(legend.position = c(.05, .95),
legend.justification = c("left", "top"))+
theme(axis.title.x = element_text(family = "Arial",face = "bold", size = 12))+
theme(axis.title.y = element_text(family = "Arial",size = 12))+
theme(axis.text.x = element_text(family = "Arial",size = 12, angle = 30, hjust = 1))+
theme(axis.text.y = element_text(family = "Arial",size = 12))+
labs(y = "Vaccinations par 100 habitants",
x = "Date",
title = "Nombre de vaccins par 100 habitants par continent",
subtitle = "de la première dose à aujourd'hui",
fill = "Continents")
plot2
Ainsi, une fois les vaccinations rapportées par 100 habitants, nous remarquons que la distribution des trois continents les plus vaccinés (l’Asie, l’Europe et l’Amérique du nord) est changée avec l’Europe qui prend le dessus sur le reste des continents bien que le nombre de personnes vaccinées en Asie par rapport aux autres Continent reste important. Encore une fois il est difficile de distinguer l’Afrique qui se situe en haut en bleu foncé et dont les doses de vaccins données par 100 semblent être moins que dans les autres continents.
Note: En observant les écarts à intervale constant des lignes blanches dénotant une absence de toutes données pour cette journée, il est aussi possible de voir l’intervale assez régulier de récolte des données par les diférentes instances (gouvernements, OMS, etc.) et colligés par Our World in Data. Ce simple fait est pourtant un bon indicateur d’une surveillance épidémiologique constante et adéquate.
Évolution des doses journalières
Faisons le même exercice avec les doses journalières cette fois
Évolution des doses journalières par million
Et voilà enfin une visualisation qui permet de bien voir la situation en Afrique et en Océanie. En rapportant le nombre de doses quotidienne de vaccins par million d’habitants, nous pouvons observer l’évolution de la distribution des doses qui a connu son appogée au cours de l’été 2021. Avec le temps, il sera possible de voir si la tendance à la baisse se maintient ou si l’arrivée des doses supplémentaires (boosters) influencera la distribution.
En gardant la même échelle de date malgré l’autorisation données pour l’utilisation de “boosters” à l’été 2021, il est possible de voir pourquoi le graphique des doses quotidiennes administrées toute catégorie continue à être bien rempli à la fin de l’année 2021 malgré une légère baisse, l’arrivée des troisièmes doses joue sur la distribution en faveur notamment de l’Europe qui a de loin la plus grade proportion de troisième dose depuis l’automne 2021.
Analyses statistiques des dernières données obtenues
Quelques statistiques permettent de mettre en lumière la situation de la campagne vaccinale au Canada à comparer au monde. Dans la dernière semaine, il y a eu en moyenne 4.379^{4} doses de vaccin données au Canada à comparer à 5.3459523^{4} dans le monde. Il y a donc une différence de 9669.5228758 doses. Au cours de la pandémie, la moyenne des vaccins par jour est plutôt de 8.4351534^{4} au Canada et 7.137962^{4} pour une différence de -1.2971914^{4}. En date de la dernière journée dont les données ont été partagées, le Canada avait vacciné 4.0381^{4} personnes en une seule journée. Ce chiffre représente 0.617961923898297 % de la totalité mondiale des gens vaccinés en cette même journée, total qui se situe à 6.534545^{6}.
Statistiques sur les vaccins vs le revenu par habitant
Avec les données que nous avons rassemblées, il est également possible de comparer les pays en fonction de certains paramètres économiques. Regardons ici s’il y a une concordance entre un le revenu par habitant et le nombre de doses de vaccins selon la population. Regardons les dernières informations reçues pour les 10 pays ayant le plus haut revenu par habitant vs les 10 pays ayant les plus bas revenus par habitants. Encore une fois, procédons à l’étude de la moyenne et ajoutons cette fois les maximums et minimums de chaque catégories.
Après quelques calculs il est possible d’observer que la moyenne de gens adéquatement vacciné des 10 pays ayant le moins haut taux de revenu par habitant est de 32.35 ce qui est équivalent à 46.2348345 à comparer à la moyenne de 69.9688889 des 10 pays ayant le plus haut taux de revenu par habitant. Il y a donc une différence marquée entre le taux de revenu par habitant et les vaccins administrés. Évidement, plusieurs facteurs entre en ligne de compte, mais cela signifie qu’il est possible de se demander comment appuyer les nations moins nanties de façon adéquate afin de faire une prévention épidémiologique adéquate dans cette situation hors du commun qui touche le monde entier.
Ainsi les données récoltées permettent de faire un survol de la situation vaccinale mondiale tout en confirmant la validité de la surveillance épidémiologique et statistique en temps de pandémie.
