# Bring in the data
data(beesRaw)
# Run the function
beesRaw_out <- flagAbsent(data = beesRaw,
PresAbs = "occurrenceStatus")
# See the result
table(beesRaw_out$.occurrenceAbsent, useNA = "always")
Run the code above in your browser using DataLab