Code domains from agreement titles
Examples
# \donttest{
title <- sample(manyenviron::agreements$IEADB$Title, 30)
code_domain(title)
#> [1] "fishing" "energy" "territorial boundaries"
#> [4] "environment" "fishing" NA
#> [7] "human rights" "fishing" "environment"
#> [10] "environment" "waste" "fishing"
#> [13] "fishing" NA "waste"
#> [16] "waste" "fishing" "fishing"
#> [19] "environment" "energy" "health"
#> [22] "environment" "climate change" "fishing"
#> [25] "fishing" NA "territorial boundaries"
#> [28] "climate change" "fishing" "environment"
# }