1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
### =========================================================================
### Summarization of an HDF5 dataset
### -------------------------------------------------------------------------
h5summarize <- function(filepath, name, index=NULL, as.integer=FALSE,
op, na.rm=FALSE, verbose=FALSE)
{
if (!is(filepath, "H5File")) {
filepath <- H5File(filepath, .no_rhdf5_h5id=TRUE)
on.exit(close(filepath))
}
name <- normarg_h5_name(name)
.Call2("C_h5summarize", filepath, name, index, as.integer,
op, na.rm, verbose,
PACKAGE="HDF5Array")
}
|
