## ----plot-options, include=FALSE----------------------------------------------
knitr::opts_chunk$set(fig.bg = "white", dev.args = list(bg = "white"))

## ----setup--------------------------------------------------------------------
library(hydromeso)

## -----------------------------------------------------------------------------
classify_mesohabitat_table(hydromeso_example, 3, 4)

## -----------------------------------------------------------------------------
v <- mesohabitat_example_vector()
classified_v <- classify_mesohabitat_vector(v, "depth", "velocity")
plot_mesohabitat(classified_v)