library(dplyr)
df <- manure %>%
filter(nchar(geo) == 5) %>%
select(geo, indic_ag, values) %>%
distinct(geo, .keep_all = TRUE) %>%
nuts_classify(nuts_code = "geo",
group_vars = "indic_ag",
data = .)
nuts_test_multiple_versions(group_vars = "indic_ag",
multiple_versions = "most_frequent",
data_versions = df$versions_data,
data = df$data)
Run the code above in your browser using DataLab