setwd("C:/Users/Administrator/Desktop/TwoSigmaCompetition")

library(h5)

D<-h5file("train.h5/train.h5")
sets<-list.datasets(D)
print(D[sets[1]])

dataMatrix<-readDataSet(D[sets[1]])

h5close(D)
rm(D)