Commerce extérieur de la France - COM-EXT

Name: Commerce extérieur de la France
Creator: François Geerolf
License: https://www.etalab.gouv.fr/licence-ouverte-open-licence/

Données - INSEE

Auteur

François Geerolf

Last observation: juin 2026 (N = 1543)

First observation: janv. 1999 (N = 1191)

Last data update: 04 sept. 2026, 00:49

Last compile: 04 sept. 2026, 01:52

Structure

Solde FAB-FAB

Code

`COM-EXT` |>
  filter(INDICATEUR == "SFF")

# # A tibble: 252 × 37
#    FREQ  SERIE_ARRETEE CORRECTION REF_AREA BASIND COM_EXT_NAF2 NATURE   ZONE_ECO
#    <chr> <chr>         <chr>      <chr>    <chr>  <chr>        <chr>    <chr>   
#  1 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  2 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  3 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  4 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  5 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  6 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  7 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  8 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  9 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
# 10 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
# # ℹ 242 more rows
# # ℹ 29 more variables: UNIT_MULT <chr>, UNIT_MEASURE <chr>, INDICATEUR <chr>,
# #   IDBANK <chr>, TITLE_FR <chr>, TITLE_EN <chr>, LAST_UPDATE <chr>,
# #   DECIMALS <chr>, TIME_PERIOD <chr>, OBS_VALUE <dbl>, OBS_STATUS <chr>,
# #   OBS_QUAL <chr>, OBS_TYPE <chr>, OBS_REV <chr>, Freq <chr>,
# #   Serie_arretee <chr>, Correction <chr>, Ref_area <chr>, Basind <chr>,
# #   Com_ext_naf2 <chr>, Nature <chr>, Zone_eco <chr>, Unit_mult <chr>, …

Automobiles

Graph

Code

`COM-EXT` |>
  
  filter(COM_EXT_NAF2 == "29-1") |>
  month_to_date() |>
  arrange(date) |>
  mutate(OBS_VALUE = OBS_VALUE |> as.numeric()) |>
  ggplot() + geom_line(aes(x = date, y = OBS_VALUE, color = ZONE_ECO)) + 
  theme_minimal() + xlab("") + ylab("Indice de Volume des Exportations Automobiles") +
  scale_x_date(breaks = seq(1960, 2100, 2) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_log10(breaks = seq(0, 200, 10),
                     labels = dollar_format(accuracy = 1, prefix = "")) +
  scale_color_manual(values = viridis(5)[1:4]) +
  theme(legend.position = c(0.7, 0.9),
        legend.title = element_blank())

Table

Code

`COM-EXT` |>
  
  filter(COM_EXT_NAF2 == "29-1") |>
  month_to_date() |>
  arrange(date) |>
  mutate(OBS_VALUE = OBS_VALUE |> as.numeric()) |>
  arrange(desc(date)) |>
  head(30) |>
  select(date, ZONE_ECO, ZONE_ECO, OBS_VALUE) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Exportations Monde Entier

Table

Code

`COM-EXT` |>
  filter(INDICATEUR == "E",
         ZONE_ECO == "190",
         TIME_PERIOD == "2020-07") |>
  
  select(COM_EXT_NAF2, COM_EXT_NAF2, TITLE_FR, OBS_VALUE) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Cuir, Meubles

Code

`COM-EXT` |>
  filter(COM_EXT_NAF2 %in% c("15", "16"),
         ZONE_ECO == "190",
         NATURE == "INDICE_VOL") |>
  
  
  month_to_date() |>
  select(COM_EXT_NAF2, COM_EXT_NAF2, INDICATEUR, INDICATEUR, date, OBS_VALUE) |>
  arrange(date) |>
  ggplot() + geom_line(aes(x = date, y = OBS_VALUE, color = COM_EXT_NAF2, linetype = INDICATEUR)) + 
  theme_minimal() + xlab("") + ylab("Indice de Volume") +
  scale_x_date(breaks = seq(1960, 2100, 2) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_log10(breaks = seq(0, 500, 20),
                labels = dollar_format(accuracy = 1, prefix = ""),
                limits = c(40, 350)) +
  scale_color_manual(values = viridis(5)[1:4]) +
  theme(legend.position = c(0.5, 0.8),
        legend.title = element_blank())

Textile, Habillement

Code

`COM-EXT` |>
  filter(COM_EXT_NAF2 %in% c("13", "14"),
         ZONE_ECO == "190",
         NATURE == "INDICE_VOL") |>
  
  
  month_to_date() |>
  select(COM_EXT_NAF2, COM_EXT_NAF2, INDICATEUR, INDICATEUR, date, OBS_VALUE) |>
  arrange(date) |>
  ggplot() + geom_line(aes(x = date, y = OBS_VALUE, color = COM_EXT_NAF2, linetype = INDICATEUR)) + 
  theme_minimal() + xlab("") + ylab("Indice de Volume") +
  scale_x_date(breaks = seq(1960, 2100, 2) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_log10(breaks = seq(0, 500, 20),
                labels = dollar_format(accuracy = 1, prefix = ""),
                limits = c(40, 350)) +
  scale_color_manual(values = viridis(5)[1:4]) +
  theme(legend.position = c(0.5, 0.8),
        legend.title = element_blank())

Table

Code

`COM-EXT` |>
  filter(ZONE_ECO == "190") |>
  
  mutate(series = paste0(INDICATEUR, "-", NATURE)) |>
  group_by(COM_EXT_NAF2, series) |>
  summarise(change =  round(100*(OBS_VALUE[TIME_PERIOD == "2020-01"]/OBS_VALUE[TIME_PERIOD == "2019-01"]-1), 1)) |>
  spread(series, change) |>
  print_table_conditional()