Skip to content

Instantly share code, notes, and snippets.

View Joaobazzo's full-sized avatar
🚲

João Pedro Bazzo Vieira Joaobazzo

🚲
View GitHub Profile
@Joaobazzo
Joaobazzo / gist:70910d5578d04a3f34f1f31ae924bd50
Last active May 2, 2020 18:54
Google maps GPS locations due to COVID in Brazil
rm(list=ls())
library(data.table)
library(dplyr)
library(ggplot2)
library(viridis)
library(stringr)
library(patchwork)
google <- data.table::fread("data-raw/Global_Mobility_Report_google.csv")
google <- google[country_region %in% "Brazil",]
@Joaobazzo
Joaobazzo / gtfs2gps_leaflet.R
Created March 19, 2020 00:31
Visualization of 20 routes of public transportation of São Paulo using gtfs2gps R package
library(gtfs2gps)
library(magrittr)
library(ggplot2)
library(gganimate)
library(data.table)
library(ggthemes)
library(sf)
library(viridis)
library(sfheaders)
library(mapview)