Skip to content
Snippets Groups Projects
Commit 781571af authored by Laura A DeCicco's avatar Laura A DeCicco
Browse files

Unifying argument names.

parent 216b183f
No related branches found
No related tags found
1 merge request!7Response to reviewer's comments.
Hide whitespace changes
Inline Side-by-side
Showing
with 3 additions and 3 deletions
R/getParameterInfo.r
+ 3
− 3
View file @ 781571af
...@@ -14,10 +14,10 @@ ...@@ -14,10 +14,10 @@
getParameterInfo <- function(parameterCd,interactive=TRUE){ getParameterInfo <- function(parameterCd,interactive=TRUE){
parameterCd <- formatCheckParameterCd(parameterCd, interactive=interactive) 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://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://help.waterdata.usgs.gov/code/parameter_cd_query?fmt=rdb&group_cd=%"
# parameterCdFile <- read.delim( # parameterCdFile <- read.delim(
# urlParameterCd, # urlparameterCd,
# header = TRUE, # header = TRUE,
# quote="\"", # quote="\"",
# dec=".", # dec=".",
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment