Indices des prix à la consommation harmonisés - IPCH-2005

Data - INSEE

Info

LAST_UPDATE

Code
`IPCH-2005` %>%
  group_by(LAST_UPDATE) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(LAST_UPDATE)) %>%
  print_table_conditional()
LAST_UPDATE Nobs
2016-01-13 33638
2015-02-19 2587

TITLE_FR

Code
`IPCH-2005` %>%
  group_by(TITLE_FR, IDBANK) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional

PRODUITS_IPCH2005

All

Code
`IPCH-2005` %>%
  left_join(PRODUITS_IPCH2005,  by = "PRODUITS_IPCH2005") %>%
  group_by(PRODUITS_IPCH2005, Produits_ipch2005) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional

2-digit

Code
`IPCH-2005` %>%
  left_join(PRODUITS_IPCH2005,  by = "PRODUITS_IPCH2005") %>%
  group_by(PRODUITS_IPCH2005, Produits_ipch2005) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional

INDICATEUR

Code
`IPCH-2005` %>%
  left_join(INDICATEUR,  by = "INDICATEUR") %>%
  group_by(INDICATEUR, Indicateur) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional
INDICATEUR Indicateur Nobs
IPCH Indice des prix à la consommation harmonisé (IPCH) 36225

FREQ

Code
`IPCH-2005` %>%
  left_join(FREQ, by = "FREQ") %>%
  group_by(FREQ, Freq) %>%
  summarise(Nobs = n()) %>%
  print_table_conditional
FREQ Freq Nobs
A Annual 5181
M Monthly 31044

NATURE

Code
`IPCH-2005` %>%
  left_join(NATURE,  by = "NATURE") %>%
  group_by(NATURE, Nature) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional
NATURE Nature Nobs
INDICE Indice 33638
POND Pondérations d'indice 2587

REF_AREA

Code
`IPCH-2005` %>%
  group_by(REF_AREA) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional
REF_AREA Nobs
FE 36225

TITLE_FR

Code
`IPCH-2005` %>%
  group_by(TITLE_FR, IDBANK) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional

TIME_PERIOD

Code
`IPCH-2005` %>%
  group_by(TIME_PERIOD) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(TIME_PERIOD)) %>%
  print_table_conditional()

Comparatif Pondérations IPC et IPCH

Santé

06 - Santé

Code
`IPCH-2005` %>%
  rename(COICOP2016 = PRODUITS_IPCH2005) %>%
  bind_rows(`IPC-2015`) %>%
  filter(COICOP2016 %in% c("06", "T06"),
         NATURE == "POND",
         REF_AREA == "FE",
         is.na(MENAGES_IPC) | MENAGES_IPC == "ENSEMBLE") %>%
  year_to_date %>%
  left_join(INDICATEUR, by = "INDICATEUR") %>%
  group_by(INDICATEUR) %>%
  filter(date >= as.Date("1996-01-01")) %>%
  arrange(date) %>%
  ggplot() + ylab("Pondération de la Santé dans l'IPC, IPCH") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = OBS_VALUE/10000, color = Indicateur)) +
  scale_color_manual(values = viridis(3)[1:2]) +
  scale_x_date(breaks = seq(1920, 2025, 2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%y")) +
  theme(legend.position = c(0.7, 0.55),
        legend.title = element_blank()) +
  scale_y_continuous(breaks = 0.01*seq(0, 300, 1),
                     labels = percent_format(accuracy = 1))