Collective bargaining coverage

Data - OECD

Author

Info

LAST_DOWNLOAD

LAST_DOWNLOAD
2023-09-09

LAST_COMPILE

LAST_COMPILE
2024-09-15

Last

obsTime	Nobs
2021	3

MEAS

Code

CBC %>%
  left_join(CBC_var$MEAS, by = c("MEAS")) %>%
  group_by(MEAS, Meas) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()

MEAS	Meas	Nobs
PCT	Percentage of employees with the right to bargain	1022

FREQ

Code

CBC %>%
  left_join(CBC_var$FREQ, by = c("FREQ")) %>%
  group_by(FREQ, Freq) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()

FREQ	Freq	Nobs
A	Annual	1022

COU

Code

CBC %>%
  left_join(CBC_var$COU, by = "COU") %>%
  group_by(COU, Cou) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  mutate(Flag = gsub(" ", "-", str_to_lower(gsub(" ", "-", Cou))),
         Flag = paste0('<img src="../../icon/flag/vsmall/', Flag, '.png" alt="Flag">')) %>%
  select(Flag, everything()) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}

obsTime

Code

CBC %>%
  group_by(obsTime) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(obsTime)) %>%
  print_table_conditional()