From 5e8d9523136abecda146a6388969aeac9cfb7a58 Mon Sep 17 00:00:00 2001
From: hadley <h.wickham@gmail.com>
Date: Fri, 22 Jan 2016 10:03:10 -0600
Subject: [PATCH] Fix broken example post move-around

---
 lists.Rmd | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lists.Rmd b/lists.Rmd
index 27f7d04..258f594 100644
--- a/lists.Rmd
+++ b/lists.Rmd
@@ -192,6 +192,7 @@ results
 If you do this a lot, you should probably make a function for it:
 
 ```{r}
+df <- data.frame(x = 1:10, y = rnorm(100))
 col_medians <- function(df) {
   out <- vector("numeric", ncol(df))
   for (i in 1:ncol(df)) {