# Load example data
data("occ_flagged", package = "RuHere")
# Get consensus using florabr, wcvp, and iucn flags
# Valid (TRUE) only when all flags are TRUE
occ_consensus_all <- flag_consensus(occ = occ_flagged,
flags = c("florabr", "wcvp", "iucn"),
consensus_rule = "all_true")
# Valid (TRUE) when at least one flag is TRUE
occ_consensus_any <- flag_consensus(occ = occ_flagged,
flags = c("florabr", "wcvp", "iucn"),
consensus_rule = "any_true")
Run the code above in your browser using DataLab