# NOT RUN {
sampleResults <- getSampleLevelGeneData(datasetObject=tinyMetaObject$originalData[[1]],
geneNames=c(tinyMetaObject$filterResults[[1]]$posGeneNames,
tinyMetaObject$filterResults[[1]]$negGeneNames))
# }
Run the code above in your browser using DataLab