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

Fixed unique bug.

parent 27724ea4
No related branches found
No related tags found
1 merge request!39Overhaul of function names. Move some functionality to EGRET.
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 3 deletions
R/importWaterML1.r
+ 2
− 3
View file @ 81f22e30
...@@ -349,9 +349,8 @@ importWaterML1 <- function(obs_url,asDateTime=FALSE, tz=""){ ...@@ -349,9 +349,8 @@ importWaterML1 <- function(obs_url,asDateTime=FALSE, tz=""){
} }
# sortingColumns <- c("agency","site_no","dateTime","tz_cd") dataColumns <- unique(dataColumns)
# dataColumns <- names(mergedDF)[!(names(mergedDF) %in% sortingColumns)] qualColumns <- unique(qualColumns)
# dataColumns <- dataColumns[-grep("_cd",dataColumns)]
sortingColumns <- names(mergedDF)[!(names(mergedDF) %in% c(dataColumns,qualColumns))] sortingColumns <- names(mergedDF)[!(names(mergedDF) %in% c(dataColumns,qualColumns))]
......
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