From 781571afedfd32a9940ba125615e7f8b4914993f Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Tue, 9 Sep 2014 10:32:55 -0500
Subject: [PATCH] Unifying argument names.
---
R/getParameterInfo.r | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/R/getParameterInfo.r b/R/getParameterInfo.r
index 171dc9d9..6cbf51e7 100644
--- a/R/getParameterInfo.r
+++ b/R/getParameterInfo.r
@@ -14,10 +14,10 @@
getParameterInfo <- function(parameterCd,interactive=TRUE){
parameterCd <- formatCheckParameterCd(parameterCd, interactive=interactive)
-# urlParameterCd <- "http://nwis.waterdata.usgs.gov/nwis/pmcodes/pmcodes?radio_pm_search=param_group&pm_group=All+--+include+all+parameter+groups&pm_search=&casrn_search=&srsname_search=&format=rdb&show=parameter_group_nm&show=parameter_nm&show=casrn&show=srsname&show=parameter_units"
-# # urlParameterCd <- "http://help.waterdata.usgs.gov/code/parameter_cd_query?fmt=rdb&group_cd=%"
+# urlparameterCd <- "http://nwis.waterdata.usgs.gov/nwis/pmcodes/pmcodes?radio_pm_search=param_group&pm_group=All+--+include+all+parameter+groups&pm_search=&casrn_search=&srsname_search=&format=rdb&show=parameter_group_nm&show=parameter_nm&show=casrn&show=srsname&show=parameter_units"
+# # urlparameterCd <- "http://help.waterdata.usgs.gov/code/parameter_cd_query?fmt=rdb&group_cd=%"
# parameterCdFile <- read.delim(
-# urlParameterCd,
+# urlparameterCd,
# header = TRUE,
# quote="\"",
# dec=".",
--
GitLab