Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@mribeirodantas

mribeirodantas/1.R Secret

Created April 5, 2020 20:41
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mribeirodantas/095335506675f6d667498ddf1d00d56e to your computer and use it in GitHub Desktop.
Save mribeirodantas/095335506675f6d667498ddf1d00d56e to your computer and use it in GitHub Desktop.
Download ZIP
Raw
1.R
setwd('/home/mribeirodantas/COVID mobility/')
library(readr)
library(dplyr)
library(lubridate)
# Source: https://covid.saude.gov.br/
brazil <- read_csv2(file = 'brazil n_cases.csv')
# Source: https://github.com/vitorbaptista/google-covid19-mobility-reports
mobility <- read_delim(file = 'mobility_reports.csv', delim = ',')
# Source: https://www.ibge.gov.br/cidades-e-estados
ibge <- read_delim(file = 'IBGE.csv', ',', skip = 1)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment