diff --git a/session_4/session_4.Rmd b/session_4/session_4.Rmd
index 26b3fb7292c30a459798863104148846b864b879..4ef310217313d38d3f8ea27a1b763b2d65e64623 100644
--- a/session_4/session_4.Rmd
+++ b/session_4/session_4.Rmd
@@ -276,17 +276,17 @@ arrange(tibble(x = c(5, 2, NA)), desc(is.na(x)))
 `select()` allows you to rapidly zoom in on a useful subset using operations based on the names of the variables.
 
 You can select by column names
-```{r select_ymd_a, , include=TRUE}
+```{r select_ymd_a, include=TRUE}
 select(flights, year, month, day)
 ```
 
 By defining a range of columns
-```{r select_ymd_b, , include=TRUE}
+```{r select_ymd_b, include=TRUE}
 select(flights, year:day)
 ```
 
 Or you can do a negative (`-`) to remove columns.
-```{r select_ymd_c, , include=TRUE}
+```{r select_ymd_c, include=TRUE}
 select(flights, -(year:day))
 ```