Typo in chunk option

EDA.Rmd

@@ -299,7 +299,7 @@ ggplot(data = diamonds, mapping = aes(x = price)) +
 
 It's hard to see the difference in distribution because the overall counts differ so much:
 
-```{r, fig.width = "50%", out.width =4}
+```{r, fig.width = "50%", fig.width = 4}
 ggplot(diamonds, aes(cut)) + 
   geom_bar()
 ```