source | dataset | Title | Download | Compile |
---|---|---|---|---|
bls | jt | Job Openings and Labor Turnover Survey - JT | NA | [2024-05-01] |
bls | la | Local Area Unemployment Statistics - LA | NA | [2024-06-19] |
bls | ln | Labor Force Statistics including the National Unemployment Rate - LN | NA | [2024-06-19] |
eurostat | nama_10_a10_e | Employment by A*10 industry breakdowns | 2024-11-09 | [2024-11-08] |
eurostat | nama_10_a64_e | National accounts employment data by industry (up to NACE A*64) | 2024-10-08 | [2024-11-05] |
eurostat | namq_10_a10_e | Employment A*10 industry breakdowns | 2024-10-08 | [2024-11-05] |
eurostat | une_rt_m | Unemployment by sex and age – monthly data | 2024-10-24 | [2024-11-05] |
oecd | ALFS_EMP | Employment by activities and status (ALFS) | 2024-05-12 | [2024-04-16] |
oecd | EPL_T | Strictness of employment protection – temporary contracts | 2023-12-10 | [2024-04-16] |
oecd | LFS_SEXAGE_I_R | LFS by sex and age - indicators | 2024-04-15 | [2024-09-15] |
oecd | STLABOUR | Short-Term Labour Market Statistics | 2024-06-30 | [2024-09-15] |
Estimations d’emploi salarié par secteur d’activité et par département
Data - INSEE
Info
LAST_UPDATE
LAST_UPDATE | Nobs |
---|---|
2024-09-19 | 98535 |
2019-03-29 | 6624 |
2018-03-30 | 6240 |
LAST_COMPILE
LAST_COMPILE |
---|
2024-11-09 |
Last
TIME_PERIOD | Nobs |
---|---|
2024-Q2 | 1281 |
Champ
2001-
A17
Départements
TITLE_FR
REF_AREA
NAF2
Tous
NAF2 | Naf2 | Nobs |
---|---|---|
78-20Z | 78.20Z - Activités des agences de travail temporaire | 10321 |
A5-BE | A5-BE - Industrie manufacturière, industries extractives et autres | 10321 |
A5-FZ | A5-FZ - Construction | 10321 |
A5-GU | A5-GU - Tertiaire marchand | 10321 |
ENS-SMNA | Secteurs marchands non agricoles | 10321 |
A17-FZ | A17-FZ - Construction | 8209 |
A17-GZ | A17-GZ - Commerce ; réparation d'automobiles et de motocycles | 7825 |
A5-AZ | A5-AZ - Agriculture, sylviculture et pêche | 6325 |
A5-OQ | A5-OQ - Tertiaire non marchand | 6325 |
ENS-SAL | Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | 6325 |
A17-C1 | A17-C1 - Fabrication de denrées alimentaires, de boissons et de produits à base de tabac | 1585 |
A17-C2DE | A17-C2DE - Industries extractives, énergie, eau, gestion des déchets et dépollution ; Cokéfaction et raffinage | 1585 |
A17-C3 | A17-C3 - Fabrication d'équipements électriques, électroniques, informatiques ; fabrication de machines | 1585 |
A17-C4 | A17-C4 - Fabrication de matériels de transport | 1585 |
A17-C5 | A17-C5 - Fabrication d'autres produits industriels | 1585 |
A17-HZ | A17-HZ - Transports et entreposage | 1585 |
A17-IZ | A17-IZ - Hébergement et restauration | 1585 |
A17-JZ | A17-JZ - Information et communication | 1585 |
A17-KZ | A17-KZ - Activités financières et d'assurance | 1585 |
A17-LZ | A17-LZ - Activités immobilières | 1585 |
A17-MN | A17-MN - Activités scientifiques et techniques ; services administratifs et de soutien | 1585 |
A17-MNO | A17-MNO - Activités scientifiques et techniques ; services administratifs et de soutien ; hors intérim | 1585 |
A17-RU | A17-RU - Autres activités de services | 1585 |
A17-AZ | A17-AZ - Agriculture, sylviculture et pêche | 1045 |
A17-OQ | A17-OQ - Administration publique, enseignement, santé humaine et action sociale | 1045 |
ENS-PRIVE | Ensemble des salariés, privé - Toutes les sections (hors activités extra-territoriales) | 1045 |
ENS-PUBLIC | Ensemble des salariés, public - Toutes les sections (hors activités extra-territoriales) | 1045 |
A5
NAF2 | Naf2 | Nobs |
---|---|---|
A5-BE | A5-BE - Industrie manufacturière, industries extractives et autres | 10321 |
A5-FZ | A5-FZ - Construction | 10321 |
A5-GU | A5-GU - Tertiaire marchand | 10321 |
A5-AZ | A5-AZ - Agriculture, sylviculture et pêche | 6325 |
A5-OQ | A5-OQ - Tertiaire non marchand | 6325 |
A17
NAF2 | Naf2 | Nobs |
---|---|---|
A17-FZ | A17-FZ - Construction | 8209 |
A17-GZ | A17-GZ - Commerce ; réparation d'automobiles et de motocycles | 7825 |
A17-C1 | A17-C1 - Fabrication de denrées alimentaires, de boissons et de produits à base de tabac | 1585 |
A17-C2DE | A17-C2DE - Industries extractives, énergie, eau, gestion des déchets et dépollution ; Cokéfaction et raffinage | 1585 |
A17-C3 | A17-C3 - Fabrication d'équipements électriques, électroniques, informatiques ; fabrication de machines | 1585 |
A17-C4 | A17-C4 - Fabrication de matériels de transport | 1585 |
A17-C5 | A17-C5 - Fabrication d'autres produits industriels | 1585 |
A17-HZ | A17-HZ - Transports et entreposage | 1585 |
A17-IZ | A17-IZ - Hébergement et restauration | 1585 |
A17-JZ | A17-JZ - Information et communication | 1585 |
A17-KZ | A17-KZ - Activités financières et d'assurance | 1585 |
A17-LZ | A17-LZ - Activités immobilières | 1585 |
A17-MN | A17-MN - Activités scientifiques et techniques ; services administratifs et de soutien | 1585 |
A17-MNO | A17-MNO - Activités scientifiques et techniques ; services administratifs et de soutien ; hors intérim | 1585 |
A17-RU | A17-RU - Autres activités de services | 1585 |
A17-AZ | A17-AZ - Agriculture, sylviculture et pêche | 1045 |
A17-OQ | A17-OQ - Administration publique, enseignement, santé humaine et action sociale | 1045 |
ENS
NAF2 | Naf2 | Nobs |
---|---|---|
ENS-SMNA | Secteurs marchands non agricoles | 10321 |
ENS-SAL | Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | 6325 |
ENS-PRIVE | Ensemble des salariés, privé - Toutes les sections (hors activités extra-territoriales) | 1045 |
ENS-PUBLIC | Ensemble des salariés, public - Toutes les sections (hors activités extra-territoriales) | 1045 |
TIME_PERIOD / date
2001-Q4, 2021-Q2, 2017-Q2
Tous
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(TIME_PERIOD %in% c("2001-Q4", "2007-Q2", "2012-Q2", "2017-Q2", "2021-Q2"),
== "FM") %>%
REF_AREA left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
print_table_conditional()
Naf2 | 2001-Q4 | 2007-Q2 | 2012-Q2 | 2017-Q2 | 2021-Q2 |
---|---|---|---|---|---|
78.20Z - Activités des agences de travail temporaire | 595345 | 701839 | 574451 | 745833 | 769515 |
A17-AZ - Agriculture, sylviculture et pêche | NA | NA | 256674 | 284376 | 308494 |
A17-C1 - Fabrication de denrées alimentaires, de boissons et de produits à base de tabac | 595589 | 573918 | 559646 | 572657 | 606847 |
A17-C2DE - Industries extractives, énergie, eau, gestion des déchets et dépollution ; Cokéfaction et raffinage | 381959 | 385402 | 381276 | 378471 | 389651 |
A17-C3 - Fabrication d'équipements électriques, électroniques, informatiques ; fabrication de machines | 578426 | 502644 | 432962 | 401317 | 401284 |
A17-C4 - Fabrication de matériels de transport | 469836 | 441314 | 392614 | 366768 | 358981 |
A17-C5 - Fabrication d'autres produits industriels | 2050558 | 1736302 | 1486785 | 1388947 | 1378064 |
A17-FZ - Construction | 1317308 | 1495651 | 1466481 | 1348655 | 1531586 |
A17-GZ - Commerce ; réparation d'automobiles et de motocycles | 2964935 | 3068478 | 3057256 | 3085021 | 3236302 |
A17-HZ - Transports et entreposage | 1345846 | 1342016 | 1326791 | 1337001 | 1383037 |
A17-IZ - Hébergement et restauration | 841934 | 941353 | 999877 | 1057803 | 1097520 |
A17-JZ - Information et communication | 678197 | 680344 | 708366 | 748603 | 853577 |
A17-KZ - Activités financières et d'assurance | 747553 | 801789 | 818258 | 837115 | 864329 |
A17-LZ - Activités immobilières | 218056 | 232616 | 226792 | 235035 | 253803 |
A17-MN - Activités scientifiques et techniques ; services administratifs et de soutien | 2631653 | 2978663 | 2923901 | 3310971 | 3578217 |
A17-MNO - Activités scientifiques et techniques ; services administratifs et de soutien ; hors intérim | 2036308 | 2276824 | 2349450 | 2565139 | 2808702 |
A17-OQ - Administration publique, enseignement, santé humaine et action sociale | NA | NA | 7806517 | 8048479 | 8124709 |
A17-RU - Autres activités de services | 1085674 | 1202058 | 1247883 | 1215449 | 1220732 |
A5-AZ - Agriculture, sylviculture et pêche | NA | NA | 256674 | 284376 | 308494 |
A5-BE - Industrie manufacturière, industries extractives et autres | 4076368 | 3639580 | 3253284 | 3108160 | 3134827 |
A5-FZ - Construction | 1317308 | 1495651 | 1466481 | 1348655 | 1531586 |
A5-GU - Tertiaire marchand | 10513849 | 11247317 | 11309124 | 11826999 | 12487517 |
A5-OQ - Tertiaire non marchand | NA | NA | 7806517 | 8048479 | 8124709 |
Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | NA | NA | 24092080 | 24616669 | 25587133 |
Ensemble des salariés, privé - Toutes les sections (hors activités extra-territoriales) | NA | NA | 18573835 | 18932730 | 19888015 |
Ensemble des salariés, public - Toutes les sections (hors activités extra-territoriales) | NA | NA | 5518244 | 5683939 | 5699118 |
Secteurs marchands non agricoles | 15907525 | 16382548 | 16028889 | 16283814 | 17153931 |
A5
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter((grepl("A5", NAF2)) | (NAF2 == "ENS-SAL")) %>%
filter(TIME_PERIOD %in% c("2001-Q4", "2007-Q2", "2012-Q2", "2017-Q2", "2021-Q2"),
== "FM") %>%
REF_AREA left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
print_table_conditional()
Naf2 | 2001-Q4 | 2007-Q2 | 2012-Q2 | 2017-Q2 | 2021-Q2 |
---|---|---|---|---|---|
A5-AZ - Agriculture, sylviculture et pêche | NA | NA | 256674 | 284376 | 308494 |
A5-BE - Industrie manufacturière, industries extractives et autres | 4076368 | 3639580 | 3253284 | 3108160 | 3134827 |
A5-FZ - Construction | 1317308 | 1495651 | 1466481 | 1348655 | 1531586 |
A5-GU - Tertiaire marchand | 10513849 | 11247317 | 11309124 | 11826999 | 12487517 |
A5-OQ - Tertiaire non marchand | NA | NA | 7806517 | 8048479 | 8124709 |
Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | NA | NA | 24092080 | 24616669 | 25587133 |
A17
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter((grepl("A17", NAF2)) | (NAF2 == "ENS-SAL")) %>%
filter(TIME_PERIOD %in% c("2001-Q4", "2007-Q2", "2012-Q2", "2017-Q2", "2021-Q2"),
== "FM") %>%
REF_AREA left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
print_table_conditional()
Naf2 | 2001-Q4 | 2007-Q2 | 2012-Q2 | 2017-Q2 | 2021-Q2 |
---|---|---|---|---|---|
A17-AZ - Agriculture, sylviculture et pêche | NA | NA | 256674 | 284376 | 308494 |
A17-C1 - Fabrication de denrées alimentaires, de boissons et de produits à base de tabac | 595589 | 573918 | 559646 | 572657 | 606847 |
A17-C2DE - Industries extractives, énergie, eau, gestion des déchets et dépollution ; Cokéfaction et raffinage | 381959 | 385402 | 381276 | 378471 | 389651 |
A17-C3 - Fabrication d'équipements électriques, électroniques, informatiques ; fabrication de machines | 578426 | 502644 | 432962 | 401317 | 401284 |
A17-C4 - Fabrication de matériels de transport | 469836 | 441314 | 392614 | 366768 | 358981 |
A17-C5 - Fabrication d'autres produits industriels | 2050558 | 1736302 | 1486785 | 1388947 | 1378064 |
A17-FZ - Construction | 1317308 | 1495651 | 1466481 | 1348655 | 1531586 |
A17-GZ - Commerce ; réparation d'automobiles et de motocycles | 2964935 | 3068478 | 3057256 | 3085021 | 3236302 |
A17-HZ - Transports et entreposage | 1345846 | 1342016 | 1326791 | 1337001 | 1383037 |
A17-IZ - Hébergement et restauration | 841934 | 941353 | 999877 | 1057803 | 1097520 |
A17-JZ - Information et communication | 678197 | 680344 | 708366 | 748603 | 853577 |
A17-KZ - Activités financières et d'assurance | 747553 | 801789 | 818258 | 837115 | 864329 |
A17-LZ - Activités immobilières | 218056 | 232616 | 226792 | 235035 | 253803 |
A17-MN - Activités scientifiques et techniques ; services administratifs et de soutien | 2631653 | 2978663 | 2923901 | 3310971 | 3578217 |
A17-MNO - Activités scientifiques et techniques ; services administratifs et de soutien ; hors intérim | 2036308 | 2276824 | 2349450 | 2565139 | 2808702 |
A17-OQ - Administration publique, enseignement, santé humaine et action sociale | NA | NA | 7806517 | 8048479 | 8124709 |
A17-RU - Autres activités de services | 1085674 | 1202058 | 1247883 | 1215449 | 1220732 |
Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | NA | NA | 24092080 | 24616669 | 25587133 |
ENS
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter((grepl("ENS", NAF2)) | (NAF2 == "ENS-SAL")) %>%
filter(TIME_PERIOD %in% c("2001-Q4", "2007-Q2", "2012-Q2", "2017-Q2", "2021-Q2"),
== "FM") %>%
REF_AREA left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
print_table_conditional()
Naf2 | 2001-Q4 | 2007-Q2 | 2012-Q2 | 2017-Q2 | 2021-Q2 |
---|---|---|---|---|---|
Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | NA | NA | 24092080 | 24616669 | 25587133 |
Ensemble des salariés, privé - Toutes les sections (hors activités extra-territoriales) | NA | NA | 18573835 | 18932730 | 19888015 |
Ensemble des salariés, public - Toutes les sections (hors activités extra-territoriales) | NA | NA | 5518244 | 5683939 | 5699118 |
Secteurs marchands non agricoles | 15907525 | 16382548 | 16028889 | 16283814 | 17153931 |
Covid-19, Depuis 2019-Q4
Tous
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(TIME_PERIOD %in% c("2019-Q4", "2021-Q2"),
== "FM") %>%
REF_AREA left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(NAF2, Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
mutate(Difference = `2021-Q2` - `2019-Q4`,
`%` = round(100*(`2021-Q2`/`2019-Q4`-1), 2),
`Contrib (%)` = round(100*((`Difference`/`2019-Q4`[NAF2 == "ENS-SAL"])), 2)) %>%
arrange(-`%`) %>%
print_table_conditional()
NAF2 | Naf2 | 2019-Q4 | 2021-Q2 | Difference | % | Contrib (%) |
---|---|---|---|---|---|---|
A17-FZ | A17-FZ - Construction | 1449030 | 1531586 | 82556 | 5.70 | 0.33 |
A5-FZ | A5-FZ - Construction | 1449030 | 1531586 | 82556 | 5.70 | 0.33 |
A17-AZ | A17-AZ - Agriculture, sylviculture et pêche | 292786 | 308494 | 15708 | 5.37 | 0.06 |
A5-AZ | A5-AZ - Agriculture, sylviculture et pêche | 292786 | 308494 | 15708 | 5.37 | 0.06 |
A17-JZ | A17-JZ - Information et communication | 815213 | 853577 | 38364 | 4.71 | 0.15 |
A17-LZ | A17-LZ - Activités immobilières | 243603 | 253803 | 10200 | 4.19 | 0.04 |
A17-C1 | A17-C1 - Fabrication de denrées alimentaires, de boissons et de produits à base de tabac | 589948 | 606847 | 16899 | 2.86 | 0.07 |
A17-MNO | A17-MNO - Activités scientifiques et techniques ; services administratifs et de soutien ; hors intérim | 2742568 | 2808702 | 66134 | 2.41 | 0.26 |
A17-GZ | A17-GZ - Commerce ; réparation d'automobiles et de motocycles | 3160528 | 3236302 | 75774 | 2.40 | 0.30 |
A17-MN | A17-MN - Activités scientifiques et techniques ; services administratifs et de soutien | 3508091 | 3578217 | 70126 | 2.00 | 0.28 |
A17-C2DE | A17-C2DE - Industries extractives, énergie, eau, gestion des déchets et dépollution ; Cokéfaction et raffinage | 382821 | 389651 | 6830 | 1.78 | 0.03 |
ENS-PRIVE | Ensemble des salariés, privé - Toutes les sections (hors activités extra-territoriales) | 19572629 | 19888015 | 315386 | 1.61 | 1.25 |
ENS-SAL | Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | 25236658 | 25587133 | 350475 | 1.39 | 1.39 |
ENS-SMNA | Secteurs marchands non agricoles | 16922416 | 17153931 | 231515 | 1.37 | 0.92 |
A5-GU | A5-GU - Tertiaire marchand | 12326882 | 12487517 | 160635 | 1.30 | 0.64 |
A17-OQ | A17-OQ - Administration publique, enseignement, santé humaine et action sociale | 8021456 | 8124709 | 103253 | 1.29 | 0.41 |
A5-OQ | A5-OQ - Tertiaire non marchand | 8021456 | 8124709 | 103253 | 1.29 | 0.41 |
A17-KZ | A17-KZ - Activités financières et d'assurance | 854366 | 864329 | 9963 | 1.17 | 0.04 |
A17-RU | A17-RU - Autres activités de services | 1210835 | 1220732 | 9897 | 0.82 | 0.04 |
ENS-PUBLIC | Ensemble des salariés, public - Toutes les sections (hors activités extra-territoriales) | 5664029 | 5699118 | 35089 | 0.62 | 0.14 |
78-20Z | 78.20Z - Activités des agences de travail temporaire | 765524 | 769515 | 3991 | 0.52 | 0.02 |
A17-HZ | A17-HZ - Transports et entreposage | 1385703 | 1383037 | -2666 | -0.19 | -0.01 |
A5-BE | A5-BE - Industrie manufacturière, industries extractives et autres | 3146504 | 3134827 | -11677 | -0.37 | -0.05 |
A17-C5 | A17-C5 - Fabrication d'autres produits industriels | 1395702 | 1378064 | -17638 | -1.26 | -0.07 |
A17-C3 | A17-C3 - Fabrication d'équipements électriques, électroniques, informatiques ; fabrication de machines | 407949 | 401284 | -6665 | -1.63 | -0.03 |
A17-C4 | A17-C4 - Fabrication de matériels de transport | 370083 | 358981 | -11102 | -3.00 | -0.04 |
A17-IZ | A17-IZ - Hébergement et restauration | 1148543 | 1097520 | -51023 | -4.44 | -0.20 |
A5
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(TIME_PERIOD %in% c("2019-Q4", "2021-Q2"),
== "FM",
REF_AREA grepl("A5", NAF2) | NAF2 == "ENS-SAL") %>%
left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(NAF2, Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
mutate(Difference = `2021-Q2` - `2019-Q4`,
`%` = round(100*(`2021-Q2`/`2019-Q4`-1), 2),
`Contrib (%)` = round(100*((`Difference`/`2019-Q4`[NAF2 == "ENS-SAL"])), 2)) %>%
arrange(-`%`) %>%
print_table_conditional()
NAF2 | Naf2 | 2019-Q4 | 2021-Q2 | Difference | % | Contrib (%) |
---|---|---|---|---|---|---|
A5-FZ | A5-FZ - Construction | 1449030 | 1531586 | 82556 | 5.70 | 0.33 |
A5-AZ | A5-AZ - Agriculture, sylviculture et pêche | 292786 | 308494 | 15708 | 5.37 | 0.06 |
ENS-SAL | Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | 25236658 | 25587133 | 350475 | 1.39 | 1.39 |
A5-GU | A5-GU - Tertiaire marchand | 12326882 | 12487517 | 160635 | 1.30 | 0.64 |
A5-OQ | A5-OQ - Tertiaire non marchand | 8021456 | 8124709 | 103253 | 1.29 | 0.41 |
A5-BE | A5-BE - Industrie manufacturière, industries extractives et autres | 3146504 | 3134827 | -11677 | -0.37 | -0.05 |
A17
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(TIME_PERIOD %in% c("2019-Q4", "2021-Q2"),
== "FM",
REF_AREA grepl("ENS", NAF2) | NAF2 == "ENS-SAL") %>%
left_join(NAF2, by = "NAF2") %>%
select_if(function(col) length(unique(col)) > 1) %>%
select(NAF2, Naf2, TIME_PERIOD, OBS_VALUE) %>%
spread(TIME_PERIOD, OBS_VALUE) %>%
mutate(Difference = `2021-Q2` - `2019-Q4`,
`%` = round(100*(`2021-Q2`/`2019-Q4`-1), 2),
`Contrib (%)` = round(100*((`Difference`/`2019-Q4`[NAF2 == "ENS-SAL"])), 2)) %>%
arrange(-`%`) %>%
print_table_conditional()
NAF2 | Naf2 | 2019-Q4 | 2021-Q2 | Difference | % | Contrib (%) |
---|---|---|---|---|---|---|
ENS-PRIVE | Ensemble des salariés, privé - Toutes les sections (hors activités extra-territoriales) | 19572629 | 19888015 | 315386 | 1.61 | 1.25 |
ENS-SAL | Ensemble des salariés - Toutes les sections (hors activités extra-territoriales) | 25236658 | 25587133 | 350475 | 1.39 | 1.39 |
ENS-SMNA | Secteurs marchands non agricoles | 16922416 | 17153931 | 231515 | 1.37 | 0.92 |
ENS-PUBLIC | Ensemble des salariés, public - Toutes les sections (hors activités extra-territoriales) | 5664029 | 5699118 | 35089 | 0.62 | 0.14 |
Sectoriel par département (2011)
Paris, Seine-Saint-Denis, Hauts-de-Seine
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(NAF2 %in% c("A5-BE", "A5-FZ", "A5-GU", "A5-AZ", "A5-OQ"),
%in% c("D92", "D93", "D75")) %>%
REF_AREA %>%
quarter_to_date select(date, REF_AREA, NAF2, OBS_VALUE) %>%
spread(NAF2, OBS_VALUE) %>%
mutate(`Total BE-FZ-GU` = `A5-BE` + `A5-FZ` + `A5-GU`,
BE_share = `A5-BE`/ `Total BE-FZ-GU`) %>%
+ geom_line(aes(x = date, y = BE_share, color = REF_AREA, linetype = REF_AREA)) +
ggplot xlab("") + ylab("Part emploi industriel (% BE-FZ-GU)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2020, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_continuous(breaks = 0.01*seq(0, 120, 1),
labels = percent_format(accuracy = 1)) +
scale_color_manual(values = viridis(5)[1:4]) +
theme(legend.position = c(0.8, 0.9),
legend.title = element_blank())
Ain, Ariège
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(NAF2 %in% c("A5-BE", "A5-FZ", "A5-GU", "A5-AZ", "A5-OQ"),
%in% c("D01", "D02", "D03")) %>%
REF_AREA %>%
quarter_to_date select(date, REF_AREA, NAF2, OBS_VALUE) %>%
spread(NAF2, OBS_VALUE) %>%
mutate(`Total BE-FZ-GU` = `A5-BE` + `A5-FZ` + `A5-GU`,
BE_share = `A5-BE`/ `Total BE-FZ-GU`) %>%
+ geom_line(aes(x = date, y = BE_share, color = REF_AREA, linetype = REF_AREA)) +
ggplot xlab("") + ylab("Part emploi industriel (% BE-FZ-GU)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2020, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_continuous(breaks = 0.01*seq(0, 120, 1),
labels = percent_format(accuracy = 1)) +
scale_color_manual(values = viridis(5)[1:4]) +
theme(legend.position = c(0.8, 0.9),
legend.title = element_blank())
Industrie - depuis 2017Q2
C1, C2, C3
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A17-C1", "A17-C2DE", "A17-C3")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
left_join(NAF2, by = "NAF2") %>%
group_by(NAF2) %>%
filter(date >= as.Date("2017-04-01")) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2017-04-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2017-T2)") + theme_minimal() +
scale_x_date(breaks = "6 months",
labels = date_format("%b %y")) +
scale_y_log10(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.5, 0.9),
legend.title = element_blank())
C4, C5, BE
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A5-BE", "A17-C4", "A17-C5")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
left_join(NAF2, by = "NAF2") %>%
group_by(NAF2) %>%
filter(date >= as.Date("2017-04-01")) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2017-04-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2017-T2)") + theme_minimal() +
scale_x_date(breaks = "6 months",
labels = date_format("%b %y")) +
scale_y_log10(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.5, 0.3),
legend.title = element_blank())
Tous
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A17-C1", "A17-C2DE", "A17-C3", "A17-C4", "A17-C5", "A5-BE")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
left_join(NAF2, by = "NAF2") %>%
group_by(NAF2) %>%
filter(date >= as.Date("2017-04-01")) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2017-04-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2017-T2)") + theme_minimal() +
scale_x_date(breaks = "6 months",
labels = date_format("%b %y")) +
scale_y_log10(breaks = seq(0, 120, 1),
limits = c(95.5, 106)) +
theme(legend.position = c(0.48, 0.88),
legend.title = element_blank(),
legend.key.size = unit(0.8, 'lines'))
Industrie
New
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A17-C3", "A17-C4", "A17-C5")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
left_join(NAF2, by = "NAF2") %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2001-10-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2001-T4)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 120, 10)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.5, 0.2),
legend.title = element_blank())
C4, C5, BE
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A17-C4", "A17-C5", "A5-BE")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
left_join(NAF2, by = "NAF2") %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2001-10-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2001-T4)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 120, 10)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.5, 0.2),
legend.title = element_blank())
BE-FZ-GU
2001-T4
Index
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
left_join(NAF2, by = "NAF2") %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2001-10-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2001-T4)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 120, 10)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.65, 0.5),
legend.title = element_blank())
Nombre
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
group_by(NAF2) %>%
+ geom_line(aes(x = date, y = OBS_VALUE)) +
ggplot xlab("") + ylab("Emploi Salarié Trimestriel dans l'industrie") + theme_minimal() +
scale_x_date(breaks = "1 year",
labels = date_format("%Y")) +
scale_y_continuous(breaks = seq(3000000, 6000000, 100000)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = "none") +
geom_text(x=as.Date("2021-03-01"), y=111, label="Construction", color = viridis(4)[2]) +
geom_text(x=as.Date("2021-03-01"), y=105, label="Tertiaire \nMarchand", color = viridis(4)[3]) +
geom_text(x=as.Date("2021-03-01"), y=100, label="Industrie", color = viridis(4)[1])
Depuis 2011
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2011-01-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2013-01-01")]) %>%
mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand")) %>%
NAF2 + geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2016-Q1)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_continuous(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.2, 0.9),
legend.title = element_blank())
Depuis 2017-Q2
Table
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand")) %>%
NAF2 select(date, Naf2, OBS_VALUE) %>%
filter(date >= as.Date("2017-04-01")) %>%
spread(Naf2, OBS_VALUE) %>%
print_table_conditional()
date | BE - Industrie | FZ - Construction | GU - Tertiaire marchand |
---|---|---|---|
2017-04-01 | 3108160 | 1348655 | 11826999 |
2017-07-01 | 3105054 | 1351643 | 11868874 |
2017-10-01 | 3110172 | 1356537 | 11967073 |
2018-01-01 | 3108733 | 1363339 | 12019497 |
2018-04-01 | 3112753 | 1371524 | 12040422 |
2018-07-01 | 3113284 | 1384608 | 12059861 |
2018-10-01 | 3121417 | 1392700 | 12093333 |
2019-01-01 | 3131675 | 1410434 | 12208054 |
2019-04-01 | 3137965 | 1423102 | 12217594 |
2019-07-01 | 3141400 | 1436051 | 12240120 |
2019-10-01 | 3146504 | 1449030 | 12326882 |
2020-01-01 | 3135289 | 1444152 | 11886436 |
2020-04-01 | 3119429 | 1459732 | 11828005 |
2020-07-01 | 3118429 | 1482379 | 12188497 |
2020-10-01 | 3115598 | 1499953 | 12158787 |
2021-01-01 | 3125624 | 1518944 | 12272311 |
2021-04-01 | 3134827 | 1531586 | 12487517 |
2021-07-01 | 3145971 | 1542137 | 12656300 |
2021-10-01 | 3153982 | 1547567 | 12809374 |
2022-01-01 | 3155753 | 1550671 | 12886223 |
2022-04-01 | 3163246 | 1552257 | 12922727 |
2022-07-01 | 3174852 | 1552392 | 12991921 |
2022-10-01 | 3180801 | 1554093 | 13056321 |
2023-01-01 | 3188570 | 1551763 | 13080642 |
2023-04-01 | 3196160 | 1548729 | 13117835 |
2023-07-01 | 3206123 | 1545289 | 13136105 |
2023-10-01 | 3215605 | 1541737 | 13115241 |
2024-01-01 | 3223236 | 1533601 | 13161817 |
2024-04-01 | 3228010 | 1524271 | 13143518 |
Index
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date arrange(date) %>%
select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2017-07-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2017-07-01")]) %>%
mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand"))%>%
NAF2 + geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2017-T3)") + theme_minimal() +
scale_x_date(breaks = "6 months",
labels = date_format("%b %y")) +
scale_y_continuous(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = "none") +
geom_text(x=as.Date("2021-03-01"), y=111, label="Construction", color = viridis(4)[2]) +
geom_text(x=as.Date("2021-03-01"), y=105, label="Tertiaire \nMarchand", color = viridis(4)[3]) +
geom_text(x=as.Date("2021-03-01"), y=100, label="Industrie", color = viridis(4)[1])
Nombre
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2017-04-01")) %>%
group_by(NAF2) %>%
+ geom_line(aes(x = date, y = OBS_VALUE)) +
ggplot xlab("") + ylab("Emploi Salarié Trimestriel dans l'Industrie") + theme_minimal() +
scale_x_date(breaks = "3 months",
labels = date_format("%m-%y")) +
scale_y_continuous(breaks = seq(3000000, 3600000, 5000),
labels = dollar_format(prefix = "")) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = "none") +
geom_text(x=as.Date("2021-03-01"), y=111, label="Construction", color = viridis(4)[2]) +
geom_text(x=as.Date("2021-03-01"), y=105, label="Tertiaire \nMarchand", color = viridis(4)[3]) +
geom_text(x=as.Date("2021-03-01"), y=100, label="Industrie", color = viridis(4)[1])
Depuis 2020-Q4
Index
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2020-10-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2020-10-01")]) %>%
mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand"))%>%
NAF2 + geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2017-Q2)") + theme_minimal() +
scale_x_date(breaks = "1 month",
labels = date_format("%b %y")) +
scale_y_continuous(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = "none") +
geom_text(x=as.Date("2021-03-01"), y=111, label="Construction", color = viridis(4)[2]) +
geom_text(x=as.Date("2021-03-01"), y=105, label="Tertiaire \nMarchand", color = viridis(4)[3]) +
geom_text(x=as.Date("2021-03-01"), y=100, label="Industrie", color = viridis(4)[1])
Nombre
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2020-10-01")) %>%
group_by(NAF2) %>%
+ geom_line(aes(x = date, y = OBS_VALUE)) +
ggplot xlab("") + ylab("Emploi Salarié Trimestriel dans l'Industrie") + theme_minimal() +
scale_x_date(breaks = "1 month",
labels = date_format("%b %y")) +
scale_y_continuous(breaks = seq(3000000, 3400000, 1000)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = "none") +
geom_text(x=as.Date("2021-03-01"), y=111, label="Construction", color = viridis(4)[2]) +
geom_text(x=as.Date("2021-03-01"), y=105, label="Tertiaire \nMarchand", color = viridis(4)[3]) +
geom_text(x=as.Date("2021-03-01"), y=100, label="Industrie", color = viridis(4)[1])
Depuis 2015
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2015-01-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2015-01-01")]) %>%
mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand"))%>%
NAF2 + geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2016-Q1)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_continuous(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.2, 0.9),
legend.title = element_blank())
Depuis 2016
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(REF_AREA == "FM",
%in% c("A5-BE", "A5-FZ", "A5-GU", "ENS-SAL")) %>%
NAF2 %>%
quarter_to_date arrange(date) %>%
select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2016-01-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2016-01-01")]) %>%
mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand",
NAF2 == "ENS-SAL" ~ "Ensemble des salariés")) %>%
NAF2 + geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2016-Q1)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 120, 1)) +
#scale_color_manual(values = viridis(5)[1:4]) +
theme(legend.position = c(0.2, 0.9),
legend.title = element_blank())
Depuis 2012
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU")) %>%
NAF2 %>%
quarter_to_date select(date, NAF2, OBS_VALUE) %>%
filter(date >= as.Date("2012-01-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2016-01-01")]) %>%
mutate(Naf2 = case_when(NAF2 == "A5-BE" ~ "BE - Industrie",
== "A5-FZ" ~ "FZ - Construction",
NAF2 == "A5-GU" ~ "GU - Tertiaire marchand"))%>%
NAF2 + geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2016-Q1)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_continuous(breaks = seq(0, 120, 1)) +
scale_color_manual(values = viridis(4)[1:3]) +
theme(legend.position = c(0.8, 0.9),
legend.title = element_blank())
BE-FZ-GU-AZ-OQ
2011T1-
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU", "A5-AZ", "A5-OQ")) %>%
NAF2 %>%
quarter_to_date left_join(NAF2, by = "NAF2") %>%
filter(date >= as.Date("2011-01-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2017-04-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2011T1)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 120, 2)) +
theme(legend.position = c(0.7, 0.2),
legend.title = element_blank())
2017T2-
Code
`TCRED-EMPLOI-SALARIE-TRIM` %>%
filter(grepl("A5-", NAF2),
== "FM",
REF_AREA %in% c("A5-BE", "A5-FZ", "A5-GU", "A5-AZ", "A5-OQ")) %>%
NAF2 %>%
quarter_to_date left_join(NAF2, by = "NAF2") %>%
filter(date >= as.Date("2017-04-01")) %>%
group_by(NAF2) %>%
mutate(OBS_VALUE = 100*OBS_VALUE / OBS_VALUE[date == as.Date("2017-04-01")]) %>%
+ geom_line(aes(x = date, y = OBS_VALUE, color = Naf2)) +
ggplot xlab("") + ylab("Emploi Trimestriel (100 = 2017-Q2)") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2023, 1) %>% paste0("-01-01") %>% as.Date,
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 120, 1)) +
theme(legend.position = c(0.4, 0.8),
legend.title = element_blank())