Commit 3966b6b1 authored by Nicolau Manubens's avatar Nicolau Manubens
Browse files

Bumped version to 0.0.4.

parent 498f21fb
Package: easyNCDF
Title: Tools to Easily Read/Write NetCDF Files into/from Multidimensional R Arrays
Version: 0.0.3
Version: 0.0.4
Authors@R: c(
person("BSC-CNS", role = c("aut", "cph")),
person("Nicolau", "Manubens", , "nicolau.manubens@bsc.es", role = c("aut", "cre")))
......
......@@ -206,7 +206,7 @@ NcToArray <- function(file_to_read, dim_indices = NULL, vars_to_read = NULL,
## original_ncvar_get_inner <- ncdf4:::ncvar_get_inner
## assignInNamespace('ncvar_get_inner', .ncvar_get_inner, 'ncdf4')
}
var_result <- do.call('[', c(list(.ncvar_get(file_object, var_name, start, count, collapse_degen = FALSE)),
var_result <- do.call('[', c(list(ncvar_get(file_object, var_name, start, count, collapse_degen = FALSE)),
lapply(indices_to_take, function(x) if (is_single_na(x)) TRUE else x - min(x) + 1), list(drop = FALSE)))
### Support for character strings
##if ((file_object[['var']][[var_name]][['prec']] == 'char') &&
......
No preview for this file type
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