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	7484146

sex

Code

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

sex	Nobs
T	2604758
M	2478047
F	2401341

worktime

Code

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

worktime	Nobs
TOTAL	2556032
FT	2485733
PT	2211706
NRP	230675

wstatus

Code

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

wstatus	Nobs
EMP	1077256
NCFAM	1075058
SAL	1058071
NSAL	941531
SELF	921646
SELF_NS	896192
SELF_S	757365
CFAM	664040
NRP	92987

isco08

Code

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

isco08	Nobs
TOTAL	862013
OC5	718918
OC3	692770
OC2	692019
OC6	689578
OC7	679239
OC9	670136
OC1	657896
OC8	628601
OC4	626823
NRP	356263
OC0	209890

geo

Code

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