kylelundstedt

library(ggplot2)
library(dplyr)
library(gridExtra)

pres <- structure(list(last_name = c("Washington", "Adams", "Jefferson",
"Madison", "Monroe", "Adams", "Jackson", "VanBuren", "Harrison",
"Tyler", "Polk", "Taylor", "Filmore", "Pierce", "Buchanan", "Lincoln",
"Johnson", "Grant", "Hayes", "Garfield", "Arthur", "Cleveland",
"Harrison", "Cleveland", "McKinley", "Roosevelt", "Taft", "Wilson",
"Harding", "Coolidge", "Hoover", "Roosevelt", "Truman", "Eisenhower",

kylelundstedt

---
title: "Multi-language Machinations in [R] Markdown"
author: "Bob Rudis (@hrbrmstr)"
date: "October 22, 2015"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

kylelundstedt

library('devtools')
library('utils')
library('httr')

update_github <-
function(ask = TRUE, ...){
  installed <- installed.packages()
  oldVersion <- installed[,'Version']
  urls <- sapply(names(oldVersion), function(x){
    d <- packageDescription(x)

kylelundstedt

library(data.table);
library(maps);
library(maptools);
library(spatstat);
library(zipcode);
library(GISTools)
#load the zipcode dataset
data(zipcode);