add R code for read HDF5 in R