diff --git a/25_GettingStarted.Rmd b/25_GettingStarted.Rmd
index 026064d..8f2d501 100644
--- a/25_GettingStarted.Rmd
+++ b/25_GettingStarted.Rmd
@@ -1,3 +1,7 @@
+```{r echo=FALSE, results='hide'}
+library(pander)
+```
+
 # Getting started
 
 ### Mathematical Operators
diff --git a/35_Lists.Rmd b/35_Lists.Rmd
index 19a80e6..78a0b4e 100644
--- a/35_Lists.Rmd
+++ b/35_Lists.Rmd
@@ -1,3 +1,7 @@
+```{r echo=FALSE, results='hide'}
+library(rblocks)
+```
+
 # Lists
 
 In this chapter, we're going to learn about lists. Lists can be a bit confusing the first time you begin to use them. Heaven knows it took me ages to get comfortable with them. However, they're a very powerful way to structure data and, once mastered, will give you all kinds of control over pretty much anything the world can throw at you. If vectors are R's atom, lists are molecules. 
diff --git a/45_BasicVisualization.Rmd b/45_BasicVisualization.Rmd
index 0095a87..d9dca7f 100644
--- a/45_BasicVisualization.Rmd
+++ b/45_BasicVisualization.Rmd
@@ -94,12 +94,12 @@ lines(X1, yHat-1, lty="dotted", lwd=0.5)
 ```{r }
 library(raw)
 data(COTOR2)
-hist(COTOR2$Claim)
-boxplot(COTOR2$Claim)
-plot(density(COTOR2$Claim))
-plot(density(log(COTOR2$Claim)))
-hist(log(COTOR2$Claim))
-hist(COTOR2$Claim, breaks=80)
+hist(COTOR2)
+boxplot(COTOR2)
+plot(density(COTOR2))
+plot(density(log(COTOR2)))
+hist(log(COTOR2))
+hist(COTOR2, breaks=80)
 ```
 
 ## Resources
diff --git a/90_AdvancedVisualization.Rmd b/90_AdvancedVisualization.Rmd
index b90f469..fda2a5b 100644
--- a/90_AdvancedVisualization.Rmd
+++ b/90_AdvancedVisualization.Rmd
@@ -202,13 +202,13 @@ library(choroplethrMaps)
 
 mapData <- subset(StateExperience, PolicyYear == 2010)
 mapData$value <- mapData$NumClaims
-mapData$region <- mapData$Fullname
+mapData$region <- tolower(mapData$Fullname)
 state_choropleth(mapData)
 ```
 
 ### Choropleths the harder way
 
-```{r}
+```{r eval=FALSE}
 states_map <- map_data("state")
 
 plt <- ggplot(subset(StateExperience, PolicyYear == 2010), aes(map_id = Fullname))
@@ -220,7 +220,7 @@ plt
 
 ### Choropleths the really hard way
 
-```{r }
+```{r eval=FALSE}
 plt <- ggplot(StateExperience, aes(map_id = Fullname))
 plt <- plt + geom_map(aes(fill = NumClaims), color = "black", map = states_map)
 plt <- plt + expand_limits(x = states_map$long, y = states_map$lat)