diff --git a/s4/index.qmd b/s4/index.qmd
index 05a55182..49df51bc 100644
--- a/s4/index.qmd
+++ b/s4/index.qmd
@@ -296,7 +296,6 @@ Next we will made a new dataset `od_data_walk` by taking `od_data` and piping it
 
 ## R
 ```{r}
-
 #| echo: true
 od_data_walk = od_data |>
   filter(walk > 0) |>
@@ -834,7 +833,7 @@ bike_trips |>
   group_by(date, hour) |>
   summarise(count = n()) |>
   ggplot() +
-  geom_line(aes(x = hour, y = count, color = date, group = date), size = 1, alpha = .6) +
+  geom_line(aes(x = hour, y = count, color = date, group = date), linewidth = 1, alpha = .6) +
   geom_point(aes(x = hour, y = count, color = date), size = 2) +
   scale_x_continuous(breaks = seq(0, 23, by = 4))
 ```