Décomposition du taux de marge des entreprises non financières - t_txmargeenf_val

Données - INSEE

Auteur

François Geerolf

Structure

Info

  • Comptes trimestriels. html

  • PIB et ses composantes. html

  • Secteurs et ses composantes. html

variable

Code 
t_txmargeenf_val |>
  group_by(variable) |>
  summarise(Nobs = n()) |>
  arrange(-Nobs) |>
  print_table_conditional()
variable Nobs
taux_marge 308
variation_taux_marge 307
Cotisations sociales 191
Salaires réels 191
Autres éléments 103
Productivité 103
Ratio du prix de la VA et du prix de la conso 103

date

Code 
t_txmargeenf_val |>
  group_by(date) |>
  summarise(Nobs = n()) |>
  arrange(desc(date)) |>
  print_table_conditional()

2021, Trimestre 1

Code 
t_txmargeenf_val |>
  filter(date == as.Date("2021-01-01")) |>
  select(-date) |>
  print_table_conditional()
variable value
taux_marge 41.6921181
variation_taux_marge 1.7423172
Productivité 0.1046758
Salaires réels 0.4061112
Cotisations sociales 0.0923867
Ratio du prix de la VA et du prix de la conso -0.2943268
Autres éléments 1.4340342

Décomposition du taux de marge des entreprises non financières

Code 
t_txmargeenf_val |>
  filter(variable == "taux_marge") |>
  mutate(version = "Estimation INSEE, 28 Juillet 2021") |>
  ggplot() + geom_line(aes(x = date, y = value / 100)) +
  xlab("") + ylab("Taux de marge des entreprises non financières (%)") +
  theme_minimal() +
  scale_x_date(breaks = seq(1870, 2100, 5) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_continuous(breaks = 0.01*seq(0, 80, 5),
                     labels = scales::percent_format(accuracy = 1))