# \donttest{
Daily <- readNWISDaily('01594440','00060',
'1985-01-01', '1985-03-31')
DailySuspSediment <- readNWISDaily('01594440','80154',
'1985-01-01', '1985-03-31',
convert = FALSE)
# }
Run the code above in your browser using DataLab