Kyle Walker walkerke
walkerke
/ exam-3.ipynb
Created
February 20, 2017 18:05
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
walkerke
/ index.html
Created
January 30, 2017 12:06
— forked from tristen/index.html
Dynamic template
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <!DOCTYPE html> | |
| <html> | |
| <head> | |
| <meta charset='utf-8' /> | |
| <title></title> | |
| <link href='https://api.tiles.mapbox.com/mapbox-gl-js/v0.26.0/mapbox-gl.css' rel='stylesheet' /> | |
| <link href='https://www.mapbox.com/base/latest/base.css' rel='stylesheet' /> | |
| <link href='site.css' rel='stylesheet' /> | |
| </head> | |
| <body class='clip loading'> |
walkerke
/ stations.geojson
Created
October 20, 2016 15:41
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
walkerke
/ pdx_distance.R
Created
September 6, 2016 00:19
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(tigris) | |
| library(sp) | |
| library(geosphere) | |
| library(mapview) | |
| pdx_city_hall <- c(-122.6800162, 45.5149686) | |
| mult <- tracts("OR", "Multnomah") | |
| multxy <- coordinates(mult) |
walkerke
/ top_metros.R
Last active
August 24, 2016 19:33
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(ggplot2) | |
| library(animation) | |
| library(readxl) | |
| library(tidyr) | |
| library(dplyr) | |
| library(stringr) | |
| library(magrittr) | |
| # Data source: Jonathan Schroeder at http://conservancy.umn.edu/handle/11299/181605 | |
| df <- read_excel('cbsa2013_hist_pops.xlsx') |
walkerke
/ new_england_zips.R
Created
August 19, 2016 00:20
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(tigris) | |
| library(sp) | |
| div <- divisions() | |
| zips <- zctas(cb = TRUE) | |
| ne <- div[div$NAME == "New England", ] | |
| ne_over <- over(ne, zips, returnList = TRUE)[[1]] |
walkerke
/ compare_urban_metro.R
Created
August 4, 2016 20:08
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(leaflet) | |
| library(tigris) | |
| library(sp) | |
| compare_urban_metro <- function(metro_name) { | |
| cbsa <- core_based_statistical_areas(cb = TRUE, resolution = '20m') | |
| ua <- urban_areas(cb = TRUE) | |
| dfw_cbsa <- cbsa[cbsa$NAME == metro_name, ] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(shiny) | |
| library(spdep) | |
| library(leaflet) | |
| library(RColorBrewer) | |
| atx <- readRDS('travis.rds') | |
| atx$id <- 1:nrow(atx) | |
| atx2 <- atx[!is.na(atx$income), ] |
walkerke
/ housing-price-maps-ggplot2.R
Created
June 29, 2016 11:52
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(readxl) | |
| library(tigris) | |
| library(sp) | |
| library(maptools) | |
| library(ggplot2) | |
| library(rgdal) | |
| library(ggthemes) | |
| library(viridis) | |
| library(extrafont) | |
| library(rgeos) |
walkerke
/ lex_animate_ussr.R
Created
June 4, 2016 10:50
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(idbr) | |
| library(dplyr) | |
| library(ggplot2) | |
| library(tidyr) | |
| library(countrycode) | |
| library(gganimate) | |
| library(tweenr) | |
| ctrys <- countrycode(c('Russia', 'Ukraine', 'Belarus', 'Moldova', 'Georgia', 'Kazakhstan', | |
| 'Uzbekistan', 'Lithuania', 'Latvia', 'Estonia', 'Kyrgyzstan', |