# NOT RUN {
siteWithTwo <- '01480015'
startDate <- "2012-09-01"
endDate <- "2012-10-01"
# }
# NOT RUN {
twoResults <- readNWISdv(siteWithTwo, "00060",startDate,endDate)
names(twoResults)
renamedCols <- renameNWISColumns(twoResults)
names(renamedCols)
#Custom names:
newNames <- renameNWISColumns(twoResults, p00060="Discharge")
names(newNames)
# }
Run the code above in your browser using DataLab