Add final worked example

ropensci · Jul 4, 2021 · 4826f1d · 4826f1d
1 parent df0b892
commit 4826f1d
Showing 1 changed file with 9 additions and 3 deletions.
diff --git a/data-raw/slides.Rmd b/data-raw/slides.Rmd
@@ -357,9 +357,15 @@ See [`roadnetworkcycling`](https://itsleeds.github.io/slopes/articles/roadnetwor
 
 ---
 
-background-image: url(https://raw.githubusercontent.com/ITSLeeds/slopes/master/man/figures/README-slope-vis-1.png)
-background-size: 70%
-background-position: bottom
+## A smaller example using packaged data
+
+```{r}
+routes = lisbon_road_segments
+dem = dem_lisbon_raster
+routes$slope = slope_raster(routes, dem)
+plot(dem)
+plot(routes["slope"], add = TRUE)
+```
 
 ---