### =========================================================================
### 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")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.