Análise do PIB em 2020 com o R

O IBGE divulgou na semana passada o resultado das Contas Nacionais Trimestrais referentes ao último trimestre de 2020. Com efeito, fazemos nesse Comentário de Conjuntura uma análise dos principais resultados da pesquisa, com foco na análise automatizada com o R. Os dados são coletados diretamente do SIDRA/IBGE, tratados e apresentados em uma apresentação em pdf.

Membros do Clube AM têm acesso completo à apresentação e aos códigos que a geraram. 

Os dados são acessados e tratados com o código abaixo:

# PIB com ajuste sazonal
pib_sa = get_sidra(api='/t/1621/n1/all/v/all/p/all/c11255/90707/d/v584%202') %>%
mutate(date = as.yearqtr(`Trimestre (Código)`, format='%Y%q')) %>%
mutate(var_marginal = (Valor/lag(Valor,1)-1)*100) %>%
select(date, Valor, var_marginal) %>%
rename(pib_sa = Valor) %>%
as_tibble()
# PIB sem ajuste
pib = get_sidra(api='/t/1620/n1/all/v/all/p/all/c11255/90707/d/v583%202') %>%
mutate(date = as.yearqtr(`Trimestre (Código)`, format='%Y%q')) %>%
mutate(var_interanual = (Valor/lag(Valor,4)-1)*100) %>%
mutate(var_anual = acum_i(Valor, 4)) %>%
dplyr::select(date, Valor, var_interanual, var_anual) %>%
rename(pib = Valor) %>%
as_tibble()
# Juntar os dados
df_pib = inner_join(pib_sa, pib, by='date') %>%
drop_na()

Na sequência, criamos uma tabela resumo com os últimos resultados.

A tabela ilustra o tombo do PIB em 2020, -4,06%, cerca da metade do que era esperado no início da pandemia, para quem gosta de ver o copo meio cheio. O gráfico a seguir ilustra a recuperação em V da economia.

Na sequência, nós podemos ver as principais métricas de crescimento em um único gráfico múltiplo.

Na sequência, nós abrimos o PIB pelos componentes de demanda e de oferta. Primeiro, nós observamos a variação na margem, contra o trimestre imediatamente anterior.

A recuperação do PIB na margem se mostrou bastante robusta nos últimos dois trimestres do ano. A FBCF teve crescimento de dois dígitos nesse período, enquanto a indústria, pelo lado da oferta, também avançou com ímpeto. O gráfico abaixo ilustra.

Na sequência, observamos a comparação interanual.

A comparação interanual mostra a indústria e a FBCF com variações positivas no último trimestre, enquanto os demais componentes, tanto pelo lado da oferta quanto pelo lado da demanda, mostram ainda números negativos.

Por fim, olhamos a variação acumulada em quatro trimestres.

Quando o crescimento é suavizado, vemos que o único setor que ainda apresenta números positivos é a agropecuária. Todos os demais componentes do PIB foram para o terreno negativo em 2020, graças à pandemia do novo coronavírus. Os gráficos abaixo ilustram.

_______________________