Average number of usual weekly hours of work in main job, by sex, professional status, full-time/part-time and occupation (hours) - lfsa_ewhuis

Data - Eurostat

Author

unit

Code

lfsa_ewhuis %>%
  group_by(unit) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

unit	Nobs
HR	7224661

sex

Code

lfsa_ewhuis %>%
  group_by(sex) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

sex	Nobs
T	2514862
M	2391711
F	2318088

worktime

Code

lfsa_ewhuis %>%
  group_by(worktime) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

worktime	Nobs
TOTAL	2468611
FT	2400630
PT	2134916
NRP	220504

wstatus

Code

lfsa_ewhuis %>%
  group_by(wstatus) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

wstatus	Nobs
EMP	1040585
NCFAM	1038444
SAL	1021839
NSAL	908582
SELF	889212
SELF_NS	864560
SELF_S	730251
CFAM	641287
NRP	89901

isco08

Code

lfsa_ewhuis %>%
  group_by(isco08) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

isco08	Nobs
TOTAL	835031
OC5	693689
OC3	668016
OC2	667303
OC6	665762
OC7	655358
OC9	646085
OC1	635505
OC8	606567
OC4	604460
NRP	345334
OC0	201551

geo

Code

lfsa_ewhuis %>%
  group_by(geo) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}