Fixes #375

DOI-USGS · Nov 20, 2023 · b000394 · b000394
1 parent dd97889
commit b000394
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/runSurvReg.R b/R/runSurvReg.R
@@ -47,7 +47,7 @@ runSurvReg <- function(estPtYear, estPtLQ, DecLow, DecHigh, Sample,
 
   localSample <- Sample
   if(any(is.na(localSample$LogQ))){
-    message("Removing Sample data that does not have corresponding flow data")
+    if (verbose) message("Removing Sample data that does not have corresponding flow data")
     localSample <- localSample[!is.na(localSample$LogQ),]
   }
   numSamples <- length(localSample$DecYear)