requireNamespace("readr") requireNamespace("dplyr") library(dplyr) # couldn't use %>% without this # this data is derived from SCAN data, but IT HAS BEEN EDITED FOR TESTING AND IS NOT USEFUL/REAL DATA, but by all means go ahead and mine it data <- dplyr::tribble( # even step coordinates (different for lat/long) ~database_id, ~datasetName, ~id, ~institutionCode, ~collectionCode, ~ownerInstitutionCode, ~basisOfRecord, ~occurrenceID, ~catalogNumber, ~otherCatalogNumbers, ~kingdom, ~phylum, ~class, ~order, ~family, ~scientificName, ~taxonID, ~scientificNameAuthorship, ~genus, ~specificEpithet, ~recordedBy, ~eventDate, ~year, ~month, ~day, ~verbatimEventDate, ~country, ~stateProvince, ~locality, ~locationRemarks, ~decimalLatitude, ~decimalLongitude, ~minimumElevationInMeters, ~rights, ~rightsHolder, ~accessRights, ~recordId, ~references, "fake SCAN1", "fakeDataset", 13775122L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100", "casent0106100", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.541, -121.7567, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:46a46727-6535-4e70-88e7-a42c98f806ed", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775122", "fake SCAN2", "fakeDataset", 13775123L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d01", "casent0106100-d01", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.542, -121.7568, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:d6ff3ddb-4695-4aaf-ab89-c251ab2fc7e6", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775123", "fake SCAN3", "fakeDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.543, -121.7569, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", "fake SCAN4", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.544, -121.7570, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN5", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.545, -121.7571, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN6", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.546, -121.7572, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN7", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.7567, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN8", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.7567, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN9", "fakeDataset", 13852774L, "CAS", "ANTWEB", "CAS, San Francisco, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0249086", "casent0249086", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "C. Schöning", "9/1/09", 2009L, 9L, 1L, "1-Sep-09", "Kenya", NA, "Chogoria", NA, -0.20222, 37.5083, 2277L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:964139d3-fb07-4a57-9b7c-e9a5830f4c82", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13852774", "fake SCAN10", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.546, -121.7572, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN11", "newDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.7567, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN12", "newDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.7567, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN13", "newDataset", 13852774L, "CAS", "ANTWEB", "CAS, San Francisco, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0249086", "casent0249086", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "C. Schöning", "9/1/09", 2009L, 9L, 1L, "1-Sep-09", "Kenya", NA, "Chogoria", NA, -0.20222, 37.5083, 2277L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:964139d3-fb07-4a57-9b7c-e9a5830f4c82", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13852774", "fake SCAN14", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Ward", "4/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.756, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN15", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Ward", "4/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.756, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN16", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Ward", "4/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.756, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN17", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Ward", "4/29/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.54, -121.756, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN18", "fakeDataset", 13775123L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d01", "casent0106100-d01", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "BeeNerd", "6/30/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.742, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:d6ff3ddb-4695-4aaf-ab89-c251ab2fc7e6", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775123", "fake SCAN19", "fakeDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "BeeNerd", "6/30/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.743, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", "fake SCAN20", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "BeeNerd", "6/30/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.744, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN21", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "BeeNerd", "6/30/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.745, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN22", "fakeDataset", 13775123L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d01", "casent0106100-d01", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "easterEgg", "6/30/15", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.7400, -121.7512, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:d6ff3ddb-4695-4aaf-ab89-c251ab2fc7e6", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775123", "fake SCAN23", "fakeDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "easterEgg", "6/30/15", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.7400, -121.7513, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", "fake SCAN24", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "easterEgg", "6/30/15", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.7400, -121.7514, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN25", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "easterEgg", "6/30/15", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 28.7400, -121.7515, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN26", "fakeDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "6/28/05", 2005L, 6L, 28L, "28 Jun 2005/29 Jun 2005", "United States", "California", "Davis", "coordinates obtained from Label", 38.543, -121.7569, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", # no matching "fake SCAN27", "anotherDataset", 13775123L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d01", "casent0106100-d01", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Yadad", "14/04/09", 2009L, 4L, 14L, "", "United States", "California", "Davis", "coordinates obtained from Label", 21.08, -128.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:d6ff3ddb-4695-4aaf-ab89-c251ab2fc7e6", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775123", "fake SCAN28", "fakeDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Yadad", "21/06/92", 1992L, 6L, 21L, "", "United States", "California", "Davis", "coordinates obtained from Label", 50.75400, -12.73, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", "fake SCAN29", "fakeDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Yadad", "2/06/25", 2025L, 6L, 2L, "", "United States", "California", "Davis", "coordinates obtained from Label", 13.2400, -150.7514, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN30", "fakeDataset_butCooler", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "Yadad", "8/01/00", 2000L, 1L, 8L, "", "United States", "California", "Davis", "coordinates obtained from Label", 09.712400, -11.753215, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA, "fake SCAN31", "fakeDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "P.S. Ward", "31/12/76", 1876L, 12L, 31L, "", "United States", "California", "Davis", "coordinates obtained from Label", 38.5423, -21.752369, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", # Too few decimals "fake SCAN32", "newDataset", 13775122L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100", "casent0106100", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "E Fischer", "6/28/95", 2095L, 6L, 28L, "28 Jun 2095/29 Jun 2095", "United States", "OuterSpace", "Davis", "coordinates obtained from Label", 38.54, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:46a46727-6535-4e70-88e7-a42c98f806ed", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775122", "fake SCAN33", "newDataset", 13775123L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d01", "casent0106100-d01", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "E Fischer", "6/28/95", 2095L, 6L, 28L, "28 Jun 2095/29 Jun 2095", "United States", "OuterSpace", "Davis", "coordinates obtained from Label", 38.55, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:d6ff3ddb-4695-4aaf-ab89-c251ab2fc7e6", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775123", "fake SCAN34", "newDataset", 13775124L, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", "CAS:ANTWEB:casent0106100-d11", "casent0106100-d11", NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "E Fischer", "6/28/95", 2095L, 6L, 28L, "28 Jun 2095/29 Jun 2095", "United States", "OuterSpace", "Davis", "coordinates obtained from Label", 38.56, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, "urn:uuid:4504a6e6-ab1c-4de7-ac43-a3588a63ae90", "https://scan-bugs.org:443/portal/collections/individual/index.php?occid=13775124", "fake SCAN35", "newDataset", NA, "CAS", "ANTWEB", "UCDC, Davis, CA, USA", "PreservedSpecimen", NA, NA, NA, "Animalia", "Arthropoda", "Insecta", "Hymenoptera", "apidae", "apis mellifera", 235783L, "Linnaeus, 1758", "Apis", "mellifera", "E Fischer", "6/28/95", 2095L, 6L, 28L, "28 Jun 2095/29 Jun 2095", "United States", "OuterSpace", "Davis", "coordinates obtained from Label", 38.57, -121.75, 15L, "http://creativecommons.org/publicdomain/zero/1.0/", "The California Academy of Sciences - AntWeb.org", NA, NA, NA ) # run the function! testOut <- BeeBDC::diagonAlley(data = data, minRepeats = 4, groupingColumns = c("eventDate", "recordedBy", "datasetName"), ndec = 3, mc.cores = 1) %>% dplyr::select(c(database_id, "eventDate", "recordedBy", "datasetName", decimalLatitude, decimalLongitude, .sequential)) %>% invisible() # Test the number of expected TRUE and FALSE values in the .sequential column resultsT <- length(testOut$.sequential[testOut$.sequential == TRUE]) resultsF <- length(testOut$.sequential[testOut$.sequential == FALSE]) testthat::test_that("diagonAlley column .sequential results TRUE", { testthat::expect_equal(resultsT, 18) }) testthat::test_that("diagonAlley column .sequential results FALSE", { testthat::expect_equal(resultsF, 17) }) # Check sequence of TRUE and FALSE values in the .sequential column correct <- c(FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE) testthat::test_that("diagonAlley column .sequential results correct series", { testthat::expect_equal(correct, testOut$.sequential) })