h5save: h5save

In mschubert/r-h5store: What the package does (short line)

Usage

h5save(X, file)

Arguments

X
file

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (X, file) 
{
    node2group = function(file, path, node) {
        for (i in seq_along(node)) {
            nval = node[[i]]
            npath = .jp(path, names(node)[i])
            h5createGroup(file, npath)
            if (is.data.frame(nval)) 
                nval = as.matrix(nval)
            if (is.list(nval)) {
                for (j in seq_along(nval)) node2group(file, npath, 
                  nval[j])
            }
            else {
                nval = as.array(nval)
                h5write(nval, file, .jp(npath, "value"))
                for (j in 1:length(dim(nval))) if (!is.null(dimnames(nval)[[j]])) 
                  h5write(dimnames(nval)[[j]], file, .jp(npath, 
                    paste0("names_", j)))
            }
        }
    }
    h5createFile(file)
    node2group(file, "", X)
  }

mschubert/r-h5store documentation built on May 23, 2019, 7:51 a.m.