Fixed bug on lines 246-247

route.lts -> route and route.geometry -> route
This commit is contained in:
syounkin 2024-11-07 09:58:34 -06:00
parent 14a097fe9e
commit 3a90407738

View File

@ -255,8 +255,8 @@ routes_lts <- bind_rows(routes_lts)
ggmap(basemap) + ggmap(basemap) +
geom_sf(data = routes_lts %>% filter(student_number == 6), inherit.aes = FALSE, geom_sf(data = routes_lts %>% filter(student_number == 6), inherit.aes = FALSE,
aes(color = route.lts, aes(color = route$lts,
geometry = route.geometry), geometry = route$geometry),
linewidth = 2) + linewidth = 2) +
scale_color_manual(values = bike_lts_scale$color, name = "Bike Level of Traffic Stress") scale_color_manual(values = bike_lts_scale$color, name = "Bike Level of Traffic Stress")