Commit 2cc63047 authored by Nicolau Manubens's avatar Nicolau Manubens
Browse files

Merge branch 'develop-bugfixes-0.0.6'

parents 27e64b6c 80a46e01
......@@ -25,5 +25,9 @@ NcReadVarNames <- function(file_to_read) {
var_names <- c(var_names, extra_dimvars)
}
if (close) {
file_closer(file_object)
}
var_names
}
......@@ -80,6 +80,10 @@ Subset <- function(x, along, indices, drop = FALSE) {
names(metadata[['dim']]) <- dim_names[-dims_to_drop]
metadata[['dimensions']] <- dim_names[-dims_to_drop]
}
if (length(metadata[['dim']]) == 0) {
metadata['dim'] <- list(NULL)
metadata['dimensions'] <- list(NULL)
}
} else if (is.character(dim_names)) {
names(metadata[['dim']]) <- dim_names
metadata[['dimensions']] <- dim_names
......
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