## Not run: ------------------------------------
# sampleID <- catalogueSEPA()$stationId[1]
# sampleTS <- tsSEPA(stationID = sampleID, plotOption = TRUE)
## ---------------------------------------------
Run the code above in your browser using DataLab