# Load the example data
data("beesFlagged")
# Run the function
OutPath_Report <- tempdir()
flagFile <- flagRecorder(
data = beesFlagged,
outPath = paste(OutPath_Report, sep =""),
fileName = paste0("flagsRecorded_", Sys.Date(), ".csv"),
# These are the columns that will be kept along with the flags
idColumns = c("database_id", "id", "catalogNumber", "occurrenceID", "dataSource"),
# TRUE if you want to find a file from a previous part of the script to append to
append = FALSE)
Run the code above in your browser using DataLab