Commit 8baad2ac authored by Laura A DeCicco's avatar Laura A DeCicco
Browse files

bug fix2

parent 9c1584d4
......@@ -119,8 +119,10 @@ importRDB1 <- function(obs_url, asDateTime=TRUE, convertType = TRUE, tz=""){
#defaults to time in seconds in readr 0.2.2.9??
if(length(grep("hms",lapply(readr.data, class))) > 0){
colHMS <- grep("hms",lapply(readr.data, class))
colList <- list(rep("c", length(colHMS)))
colList <- as.list(rep("c",length(colHMS)))
names(colList) <- paste0("X",colHMS)
readr.data <- suppressWarnings(read_delim(doc, skip = (meta.rows+2),delim="\t",
col_names = FALSE,
col_types = colList))
......
Supports Markdown
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