# \donttest{
tmp <- tempfile(fileext = ".h5")
# Create dataset using BigDataStatMeth API
X <- hdf5_create_matrix(tmp, "data/expression",
data = matrix(rnorm(200), 20, 10))
dim(X) # 20 x 10
X[1:5, 1:3] # subset
crossprod(X) # t(X) %*% X
close(X)
unlink(tmp)
# }
Run the code above in your browser using DataLab