Emplois

Data - INSEE

Author

Emplois industriels privés

Tous

Code

IR_ETE_2024_FLASH_FR %>%
  filter(line == 61) %>%
  ggplot + geom_line(aes(x = date, y = value)) +
  theme_minimal() + ylab("Nombre d'emplois industriels privés") + xlab("") +
  scale_x_yearqtr() +
  theme(legend.position = c(0.12, 0.7),
        legend.title = element_blank()) +
  scale_y_continuous(breaks = seq(0, 7000, 100))

1997-

Code

IR_ETE_2024_FLASH_FR %>%
  filter(line == 61) %>%
  filter(date >= as.yearqtr("1997 Q1")) %>%
  ggplot + geom_line(aes(x = date, y = value)) +
  theme_minimal() + ylab("Nombre d'emplois industriels privés") + xlab("") +
  scale_x_yearqtr() +
  theme(legend.position = c(0.12, 0.7),
        legend.title = element_blank()) +
  scale_y_continuous(breaks = seq(0, 7000, 100))

2000-

Code

IR_ETE_2024_FLASH_FR %>%
  filter(line == 61) %>%
  filter(date >= as.yearqtr("2000 Q1")) %>%
  ggplot + geom_line(aes(x = date, y = value)) +
  theme_minimal() + ylab("Nombre d'emplois industriels privés") + xlab("") +
  scale_x_yearqtr() +
  theme(legend.position = c(0.12, 0.7),
        legend.title = element_blank()) +
  scale_y_continuous(breaks = seq(0, 7000, 100))