diff --git a/R/readWQPqw.r b/R/readWQPqw.r
index f53c53901a26b114d6f5dde55feb6d567677d869..5ed6e75ba6a6fd48ab05d24a30baa9a858f48726 100644
--- a/R/readWQPqw.r
+++ b/R/readWQPqw.r
@@ -25,7 +25,7 @@
 #' \dontrun{
 #' rawPcode <- readWQPqw('USGS-01594440','01075', '', '')
 #' rawCharacteristicName <- readWQPqw('WIDNR_WQX-10032762','Specific conductance', '', '')
-#' rawSites <- readWQPqw(c('USGS-01594440', 'USGS-01594440'), '01075','','')
+#' rawPHmultiSite <- readWQPqw(c('USGS-05406450', 'USGS-05427949','WIDNR_WQX-133040'), 'pH','','')
 #' }
 readWQPqw <- function(siteNumbers,parameterCd,startDate="",endDate=""){