Added query time.

27724ea4 · Laura A DeCicco · 112f14ef · 27724ea4
Commit 27724ea4 authored 10 years ago by Laura A DeCicco
--- a/R/whatNWISData.r
+++ b/R/whatNWISData.r
@@ -77,6 +77,7 @@ whatNWISdata <- function(siteNumbers,service="all",parameterCd="all",statCd="all
  
  comment(SiteFile) <- headerInfo
  attr(SiteFile, "url") <- urlSitefile
+  attr(SiteFile, "queryTime") <- Sys.time()
  
  return(SiteFile)