• 1)INTRODUÇÃO: ASPECTOS BÁSICOS DO R.

• 2)LENDO DADOS DO BANCO CENTRAL.

• 3)GRÁFICO COM PLOTLY

• Primeiramente copie e instale o R (https://cran.r-project.org/bin/windows/base/) e o R Studio (https://rstudio.com/products/rstudio/download/).

• Após a instalação, abra o R studio, perceba que ele tem 4 quadrantes.

• Este software é poderoso para análise de dados e gratuito. O seu funcionamento ocorre através de comandos.

• Para instalar novos pacotes no R utilizaremos o comando install.packages(“nomedopacote”), em seguida para lermos o pacote usamos o library(nomedopacote) .

• Quando digitamos após o símbolo #, o R reconhecerá que essas palavras não são um comando, servindo para fazermos anotações e comentários.

#install.packages("ggplot2")
#install.packages("plotly")
#install.packages("readxl")
#install.packages("BETS")
#install.packages("dplyr")
library(ggplot2)
library(plotly)
library(readxl)
library(BETS)
library(dplyr)

• Vamos agora utilizar um pacote para obtenção de dados do Banco Central.

• Essa é a Base Monetária, considerando o código da série (1788) obtido no site do BC. Corresponde a Base monetária (saldo em final de período) (https://www3.bcb.gov.br/sgspub/localizarseries/localizarSeries.do?method=prepararTelaLocalizarSeries).

B<- BETSget(1788, from='1995-01-01', data.frame=T)

Lembrando que Base Monetária é igual a:

\[B=PMC+E_c + E_v \]

graf1<-ggplot(B, aes(date, value))+ geom_line(size=.8)+ 
  xlab('')+ylab('Unidade')+labs(title='Base Monetária')
graf1

• Obtendo a série M1. Lembrando que:

\[M1=PMPP+DV\]

M1<- BETSget(27791, from='2002-01-01', data.frame=T)

graf2<-ggplot(M1, aes(date, value))+ geom_line(size=.8)+ 
  xlab('')+ylab('Unidade')+labs(title='M1')
graf2

• Obtendo a série multiplicador monetário. Lembrando que:

\[\alpha=1/(1-d(1-e))\]

alfa<- BETSget(7534, from='2003-01-01', data.frame=T)

graf3<-ggplot(alfa, aes(date, value))+ geom_line(size=.8)+ 
  xlab('')+ylab('Unidade')+labs(title='Multiplicador Monetário')
graf3

ggplotly(graf1)

ggplotly(graf2)

ggplotly(graf3)