Incoming locationID
values are compared
against the incoming locationTbl
and any matches are removed.
table_removeRecord(locationTbl = NULL, locationID = NULL, verbose = TRUE)
Tibble of known locations.
Vector of locationID
strings.
Logical controlling the generation of progress messages.
Updated tibble of known locations.
library(MazamaLocationUtils)
locationTbl <- get(data("wa_monitors_500"))
dim(locationTbl)
#> [1] 78 13
# Wenatchee
lon <- -120.325278
lat <- 47.423333
# Get the locationID first
locationID <- table_getLocationID(locationTbl, lon, lat, distanceThreshold = 500)
# Remove it
locationTbl <- table_removeRecord(locationTbl, locationID)
dim(locationTbl)
#> [1] 78 13
# Test
table_getLocationID(locationTbl, lon, lat, distanceThreshold = 500)
#> [1] NA