Pokemon Go…breaking it!

Ok, mais R. Agora, mudando o final do período de 06/2016 para 01/2017.

pokemon1pokemon2

library(gtrendsR)
res <- gtrends(c("Pokemon", "Evangelion", "Dragon Ball"), geo = c("BR"), time = "2004-01-01 2016-06-01")
plot(res)

res <- gtrends(c("Pokemon", "Evangelion", "Dragon Ball"), geo = c("BR"), time = "2004-01-01 2017-01-01")
plot(res)
Anúncios

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s