Range check bug

[cristinamullin]

Describe the bug

The WQX validation table includes multiple thresholds for the same characteristic, unit, and media combination. Once that is resolved, update these lines for both TADA_FlagAboveThreshold and TADA_FlagBelow Threshold in ResultFlagsIndependent.R:

check.data <- dplyr::left_join(.data,
unit.ref,
by = c("TADA.CharacteristicName",
"TADA.ActivityMediaName",
"TADA.ResultMeasure.MeasureUnitCode"),
multiple = "any", # this should be "all" but the validation table has issues
relationship = "many-to-many" # this should be "one-to-one" but the validation table has issues
)