Nothing
inst/unitTests/test_getSampleLevelGeneData.R
In MetaIntegrator: Meta-Analysis of Gene Expression Data
#This file was written by Winn Haynes
#Last updated: April 8, 2015
library(RUnit)
# source("R/getSampleLevelGeneData.R")
#########
#These should pass
#########
sampleResults <- getSampleLevelGeneData(datasetObject=tinyMetaObject$originalData[[1]],
geneNames=c(tinyMetaObject$filterResults[[1]]$posGeneNames, tinyMetaObject$filterResults[[1]]$negGeneNames))
checkEquals(sampleResults["Gene27", "Sample.1"], 7.016342, tolerance=1e-3)
checkEquals(sampleResults["Gene42", "Sample.49"], 9.196237, tolerance=1e-3)
Try the MetaIntegrator package in your browser
Any scripts or data that you put into this service are public.
MetaIntegrator documentation built on March 26, 2020, 6:29 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
#This file was written by Winn Haynes
#Last updated: April 8, 2015
library(RUnit)
# source("R/getSampleLevelGeneData.R")
#########
#These should pass
#########
sampleResults <- getSampleLevelGeneData(datasetObject=tinyMetaObject$originalData[[1]],
geneNames=c(tinyMetaObject$filterResults[[1]]$posGeneNames, tinyMetaObject$filterResults[[1]]$negGeneNames))
checkEquals(sampleResults["Gene27", "Sample.1"], 7.016342, tolerance=1e-3)
checkEquals(sampleResults["Gene42", "Sample.49"], 9.196237, tolerance=1e-3)
Try the MetaIntegrator package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.