library("tidyverse")
Exploration des données
"https://www.data.gouv.fr/fr/datasets/r/350efeac-245a-405a-8384-143866552806" %>%
read_csv2() %>%
names()
## [1] "siren" "denomination_employeur"
## [3] "annee" "somme_10_plus_hautes_remunerations"
## [5] "nb_femmes_beneficiaires" "nb_hommes_beneficiaires"
## [7] "duree_cumulee_mois" "commentaires"
"https://www.data.gouv.fr/fr/datasets/r/15e882bb-2ba1-4456-8f1d-66ec750631fa" %>%
read_csv2() %>%
names()
## [1] "Siren"
## [2] "Dénomination de l'employeur"
## [3] "Année"
## [4] "Somme des dix plus hautes rémunérations brutes en euros"
## [5] "Nombre de femmes bénéficiaires"
## [6] "Nombre d'hommes bénéficiaires"
## [7] "Durée cumulée en nombre de mois"
## [8] "Commentaires"