# NOT RUN {
# Small example
data(dem)
aspect = aspect(dem)
r = c(dem, round(aspect, 1), along = 3)
r = st_set_dimensions(r, 3, values = c("input", "aspect"))
plot(r, text_values = TRUE, breaks = "equal", col = hcl.colors(11, "Spectral"))
# }
# NOT RUN {
# Larger example
data(carmel)
carmel_aspect = aspect(carmel)
r = c(carmel, round(carmel_aspect, 1), along = 3)
r = st_set_dimensions(r, 3, values = c("input", "aspect"))
plot(r, breaks = "equal", col = hcl.colors(11, "Spectral"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab