# NOT RUN {
# Starting table
locationTbl <- get(data("wa_monitors_500"))
names(locationTbl)
# Add an empty column
locationTbl <-
locationTbl %>%
table_addColumn("siteName")
names(locationTbl)
# }
Run the code above in your browser using DataLab