x27;,
> sep = "")
> tab.url <-
> paste('http://nwis.waterdata.usgs.gov/nwis/peak?site_no=',siteno[a],'&agency_cd=USGS&format=rdb',
> sep = "")
>
> graphic.fn <- paste('graphic_',siteno[a],'.gif', sep = "")
>
('peakfq_',siteno[a],'.txt', sep = "")
tab.fn <- paste('tab_',siteno[a],'.txt', sep = "")
download.file(graphic.img,graphic.fn,mode='wb')
download.file(peakfq.url,peakfq.fn)
download.file(tab.url,tab.fn)
}
> ---
Hi Chris,
I don't have the packages you are using, but tracing this indicates
that the page source contains the relative path of the graphic, in
this case:
/nwisweb/data/img/USGS.12144500.19581112.20140309..0.peak.pres.gif
and you already have the server URL:
nwis.waterdata.usgs.gov
getting the
3 matches
Mail list logo
