Skip to content

Instantly share code, notes, and snippets.

View walkerke's full-sized avatar

Kyle Walker walkerke

867 followers · 28 following
View GitHub Profile
@walkerke
walkerke / index.html
Created August 6, 2014 02:51
Projections w/interactive guideline
<!doctype HTML>
<meta charset = 'utf-8'>
<html>
<head>
<link rel='stylesheet' href='http://nvd3.org/assets/css/nv.d3.css'>
<script src='http://ajax.googleapis.com/ajax/libs/jquery/1.8.2/jquery.min.js' type='text/javascript'></script>
<script src='http://d3js.org/d3.v3.min.js' type='text/javascript'></script>
<script src='http://timelyportfolio.github.io/rCharts_nvd3_tests/libraries/widgets/nvd3/js/nv.d3.min-new.js' type='text/javascript'></script>
<script src='http://nvd3.org/assets/lib/fisheye.js' type='text/javascript'></script>
@walkerke
walkerke / index.html
Created August 6, 2014 02:53
Regions w/interactive guideline
<!doctype HTML>
<meta charset = 'utf-8'>
<html>
<head>
<link rel='stylesheet' href='http://nvd3.org/assets/css/nv.d3.css'>
<script src='http://ajax.googleapis.com/ajax/libs/jquery/1.8.2/jquery.min.js' type='text/javascript'></script>
<script src='http://d3js.org/d3.v3.min.js' type='text/javascript'></script>
<script src='http://timelyportfolio.github.io/rCharts_nvd3_tests/libraries/widgets/nvd3/js/nv.d3.min-new.js' type='text/javascript'></script>
<script src='http://nvd3.org/assets/lib/fisheye.js' type='text/javascript'></script>
@walkerke
walkerke / mpld3-interact.ipynb
Created November 6, 2014 20:19
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@walkerke
walkerke / gpa-major-example.ipynb
Created December 4, 2014 20:53
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@walkerke
walkerke / europe_dygraph.ipynb
Created December 18, 2014 18:23
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@walkerke
walkerke / svg_boxplot.R
Created January 14, 2015 01:59
library(tidyr)
library(ggplot2)
library(svgPanZoom)
i <- 1
l <- list()
while (i < 16) {
d <- runif(n = 1200, min = 20, max = 180)
@walkerke
walkerke / svg_boxplot.html
Created January 14, 2015 02:03
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8" />
<script src="data:application/x-javascript,%28function%28%29%20%7B%0A%20%20%2F%2F%20If%20window%2EHTMLWidgets%20is%20already%20defined%2C%20then%20use%20it%3B%20otherwise%20create%20a%0A%20%20%2F%2F%20new%20object%2E%20This%20allows%20preceding%20code%20to%20set%20options%20that%20affect%20the%0A%20%20%2F%2F%20initialization%20process%20%28though%20none%20currently%20exist%29%2E%0A%20%20window%2EHTMLWidgets%20%3D%20window%2EHTMLWidgets%20%7C%7C%20%7B%7D%3B%0A%0A%20%20%2F%2F%20See%20if%20we%27re%20running%20in%20a%20viewer%20pane%2E%20If%20not%2C%20we%27re%20in%20a%20web%20browser%2E%0A%20%20var%20viewerMode%20%3D%20window%2EHTMLWidgets%2EviewerMode%20%3D%0A%20%20%20%20%20%20%2F%5Cbviewer%5Fpane%3D1%5Cb%2F%2Etest%28window%2Elocation%29%3B%0A%0A%20%20%2F%2F%20See%20if%20we%27re%20running%20in%20Shiny%20mode%2E%20If%20not%2C%20it%27s%20a%20static%20document%2E%0A%20%20%2F%2F%20Note%20that%20static%20widgets%20can%20appear%20in%20both%20Shiny%20and%20static%2
@walkerke
walkerke / svg_boxplot2.R
Created January 14, 2015 03:12
library(tidyr)
library(ggplot2)
library(svgPanZoom)
df <- data.frame(replicate(15, runif(1200, 20, 180)))
yrs <- sapply(seq(1999, 2013, 1), function(x) paste0("y", as.character(x)))
names(df) <- yrs
@walkerke
walkerke / merge_wdi_to_ne.R
Last active August 29, 2015 14:14
library(rgdal)
library(WDI)
library(leaflet)
## Download data from Natural Earth
url <- "http://www.naturalearthdata.com/http//www.naturalearthdata.com/download/50m/cultural/ne_50m_admin_0_countries.zip"
tmp <- tempdir()
@walkerke
walkerke / leaflet_lines.R
Created February 26, 2015 04:10
## Set your working directory
library(rgdal)
library(leaflet)
# Assuming here that you've set your directory with the dropdown in RStudio
dir <- getwd()
# Read in your data as a SpatialLinesDataFrame with readOGR; assuming here that you are reading in a shapefile