library(MazamaLocationUtils)
# Starting table
locationTbl <- get(data("wa_monitors_500"))
names(locationTbl)
# Add an empty column
locationTbl <-
locationTbl %>%
table_addColumn("AQSID")
names(locationTbl)
Run the code above in your browser using DataLab