library(h5vc) # loading the library
tallyFile <- system.file( "extdata", "example.tally.hfs5", package = "h5vcData" )
data <- h5readBlock( #extracting coverage, deletions and reference using h5dreadBlock
filename = tallyFile,
group = "/ExampleStudy/16",
names = c( "Coverages", "Deletions", "Reference" ),
range = c(29000000,29010000),
verbose = TRUE
)
str(data)
sampleData <- getSampleData( tallyFile, "/ExampleStudy/16" )
#Subsetting by Sample
sampleData <- sampleData[sampleData$Patient == "Patient8",]
data <- h5readBlock( #extracting coverage, deletions and reference using h5dreadBlock
filename = tallyFile,
group = "/ExampleStudy/16",
names = c( "Coverages", "Deletions", "Reference" ),
range = c(29000000,29010000),
samples = sampleData$Sample,
verbose = TRUE
)
str(data)
Run the code above in your browser using DataLab