From 4a90bbe06307d232bcb95fd14f98b1adb74d27a2 Mon Sep 17 00:00:00 2001
From: hadley <h.wickham@gmail.com>
Date: Wed, 15 Jun 2016 10:27:01 -0500
Subject: [PATCH] Ooops, need to eval that chunk

---
 model-many.Rmd | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/model-many.Rmd b/model-many.Rmd
index 867f223..949d58b 100644
--- a/model-many.Rmd
+++ b/model-many.Rmd
@@ -111,7 +111,7 @@ Note the difference between a standard grouped data frame and a nested data fram
 
 Now that we have our nested data frame, we're in a good position to fit some models because we can think about transforming each data frame into a model. Transforming each element of a list is the job of `purrr:map()`:
 
-```{r, eval = FALSE}
+```{r}
 country_model <- function(df) {
   lm(lifeExp ~ year, data = df)
 }