Dados Macroeconômicos

Bitcoin no R

By 21 de agosto de 2017 No Comments

Vou participar de dois eventos no mês que vem sobre criptomoedas e, portanto, estou lendo um pouco mais sobre o assunto. Nunca tive grande interesse pelo tema (sim, eu não sou austríaco), mas é sempre bom a gente expandir nosso conhecimento, não é mesmo? E qual a melhor forma de começar? Sim, tendo acesso aos dados...

library(Quandl)
library(ggplot2)
library(forecast)
library(scales)
btc = Quandl("BCHARTS/ROCKUSD", type='xts')
autoplot(btc[,4])+
 annotate("rect", fill = "gray", alpha = 0.5, 
 xmin = as.Date('2016-08-01'), 
 xmax = as.Date('2017-08-20'),
 ymin = -Inf, ymax = Inf)+
 geom_line(size=.1, colour='darkblue')+
 scale_y_discrete(limits=c(0,500,1000,1500,2000,2500,3000,3500,4000,
 4500))+
 scale_x_date(breaks = date_breaks("3 months"),
 labels = date_format("%b/%Y"))+
 theme(axis.text.x=element_text(angle=45, hjust=1),
 plot.title = element_text(size=11, face='bold'),
 plot.caption = element_text(size=9),
 axis.title.y = element_text(size=9))+
 xlab('')+ylab('')+
 labs(title='Bitcoin vs. USD (Fechamento Diário)',
 subtitle='Fonte: Quandl R API')

O gráfico, como se pode ver no código, está baseado no Quandl, mas há um pacote específico chamado Rbitcoin. Por enquanto é isso. Ao longo das próximas semanas falo mais de bitcoin por aqui! 🙂

Receba diretamente em seu e-mail gratuitamente nossas promoções especiais
e conteúdos exclusivos sobre Análise de Dados!

Assinar Gratuitamente