Description Usage Arguments Examples
Basic plot
1 2 3 4 5 6 7 |
sites |
character vector of site ids |
col |
for basin fill |
mapRange |
vector of map limits (min long, max long, min lat, max lat) |
streamorder |
integer |
filePath |
path to save shapefiles. If NA, will go to temporary directory |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | ## Not run:
library(dataRetrieval)
Range=c(-86.32679,-81.16322,39.61600,43.06262)
sites=c("04189000","04197100","04198000","04185000","04199500","04176500","04193500")
siteInfo <- readNWISsite(sites)
png("test.png",width=11,height=8,units="in",res=600,pointsize=4)
plotWSB(sites, mapRange=Range)
points(siteInfo$dec_long_va, siteInfo$dec_lat_va, pch=20, col="red", cex=3)
box()
dev.off()
site <- '08076000'
siteInfo <- readNWISsite(site)
png("test.png",width=11,height=8,units="in",res=600,pointsize=4)
plotWSB(site)
points(siteInfo$dec_long_va, siteInfo$dec_lat_va, pch=20, col="red", cex=3)
box()
dev.off()
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.