rhdf5_test.R

#! /usr/bin/R
library(rhdf5)

print(h5ls('gzip.h5'));

test_limits <- seq(1e3, 1e6, 1e3)

for(limit in test_limits) {
  print(limit)
  dat_gzip <- h5read('gzip.h5', "DS1/", index = list(1:20,1:limit));
  }