Indices de chiffre d’affaires dans les services - ICA-2015-SERVICES

Data - INSEE

Author

François Geerolf


Info

LAST_UPDATE

Code 
`ICA-2015-SERVICES` %>%
  group_by(LAST_UPDATE) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional
LAST_UPDATE Nobs
2024-02-29 203700

CORRECTION

Code 
`ICA-2015-SERVICES` %>%
  left_join(CORRECTION, by = "CORRECTION") %>%
  group_by(CORRECTION, Correction) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

EUROSTAT_ICA-SERVICES

Code 
`ICA-2015-SERVICES` %>%
  left_join(`EUROSTAT_ICA-SERVICES`, by = "EUROSTAT_ICA-SERVICES") %>%
  group_by(`EUROSTAT_ICA-SERVICES`, `Eurostat_ica-Services`) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional
EUROSTAT_ICA-SERVICES Eurostat_ica-Services Nobs
BDM BDM 181500
BDM_EUR BDM_EUR 22200

NAF2

Code 
`ICA-2015-SERVICES` %>%
  left_join(NAF2, by = "NAF2") %>%
  group_by(NAF2, Naf2) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

TIME_PERIOD

Code 
`ICA-2015-SERVICES` %>%
  group_by(TIME_PERIOD) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(TIME_PERIOD)) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Dernier

Code 
`ICA-2015-SERVICES` %>%
  filter(CORRECTION == "BRUT") %>%
  select_if(function(col) length(unique(col)) > 1) %>%
  select(-TITLE_EN) %>%
  print_table_conditional