6.461-462 - Consommation de capital fixe par branche (38 postes) - T_6461

Données - INSEE

Last observation: 2023 (N = 47)

First observation: 1978 (N = 47)

Last data update: 02 août 2026, 11:05

Last compile: 04 sept. 2026, 02:19

Structure

variable

Info

Last Year

Ordre Ligne

T_6461 |>
  filter(year == max(year)) |>
  year_to_date2() |>
  left_join(gdp, by = "date") |>
  select(-date) |>
  mutate(value_gdp = round(100*value/gdp, 1)) |>
  select(-gdp) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Ordre décroissant

T_6461 |>
  filter(year == max(year)) |>
  year_to_date2() |>
  left_join(gdp, by = "date") |>
  select(-date) |>
  mutate(value_gdp = round(100*value/gdp, 1)) |>
  select(-gdp) |>
  arrange(-value) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

gdp

gdp |>
  mutate(gdp = round(gdp) |> paste0(" Mds€")) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Table

2023

T_6461 |>
  filter(year == "2023") |>
  select(-year) |>
  mutate(value = round(value) |> paste0(" Mds€")) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

2018

T_6461 |>
  filter(year == "2018") |>
  select(-year) |>
  mutate(value = round(value) |> paste0(" Mds€")) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Activités immobilières

T_6461 |>
  filter(variable %in% c("A10_LZ", "A5_BE")) |>
  year_to_date2() |>
  arrange(desc(date)) |>
  left_join(gdp, by = "date") |>
  ggplot() + geom_line(aes(x = date, y = value / gdp, color = Variable)) +
  theme_minimal() + xlab("") + ylab("Dépréciation du capital (% du PIB)") +
  scale_x_date(breaks = seq(1940, 2100, 5) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_continuous(breaks = 0.01*seq(-20, 500, 0.1),
                labels = percent_format(accuracy = .1)) +
  
  theme(legend.position = c(0.4, 0.85),
        legend.title = element_blank())