library(rhdf5)
toy_h5 <- system.file("extdata", "toy.h5", package="HDF5Array")
h5ls(toy_h5)
M1 <- HDF5Array(toy_h5, "M1")
M2 <- HDF5Array(toy_h5, "M2")
M <- rbind(M1, t(M2))
M
colMeans(M)
Run the code above in your browser using DataCamp Workspace