Commit d97c42a1 authored by Nicolau Manubens Gil's avatar Nicolau Manubens Gil
Browse files

Fixed bug...

parent bcf13c65
......@@ -220,8 +220,10 @@ NcToArray <- function(file_to_read, dim_indices = NULL, vars_to_read = NULL,
## TODO: Crop dimensions in attributes
if (!is.null(reorder_back)) {
var_result <- aperm(var_result, reorder_back)
names(dim(var_result)) <- names(indices_to_take)[reorder_back]
} else {
names(dim(var_result)) <- names(indices_to_take)
}
names(dim(var_result)) <- names(indices_to_take)[reorder_back]
#if (!is.null(missing_dims)) {
# dim(var_result) <- original_dims
#}
......
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