# \donttest{
fn <- tempfile(fileext = ".h5")
hdf5_create_matrix(fn, "MGCCA_IN/X",
data = matrix(rnorm(5000), 100, 50))
bdWrite_hdf5_dimnames(
filename = fn,
group = "MGCCA_IN",
dataset = "X",
rownames = paste0("r", seq_len(100)),
colnames = paste0("c", seq_len(50))
)
hdf5_close_all()
unlink(fn)
# }
Run the code above in your browser using DataLab