siteNumber <- "434400121275801"
## Not run:
# data <- readNWISgwl(siteNumber, '','')
# sites <- c("434400121275801", "375907091432201")
# data2 <- readNWISgwl(sites, '','')
# data3 <- readNWISgwl("420125073193001", '','')
# ## End(Not run)
Run the code above in your browser using DataLab