Barrier Query
query_barrier.Rdretrieve Barrier ID according to its name in the barrier database
Examples
query_barrier(barrierName = "Q.1 - Activated Sludge")
#> [1] 1
query_barrier(barrierName = c("Q.1 - Activated Sludge", "Q.2 - Maturation Pond"))
#> [1] 1 2
query_barrier(barrierName = "P.9 - Peeling, P.7 - Cooking")
#> [1] 14 16