library(SpeCond)
data(expressionSpeCondExample)
##Perform the SpeCond analysis step by step
param.detection=getDefaultParameter()
param.detection
fit1=fitPrior(expressionSpeCondExample, param.detection=param.detection)
specificOutlierStep1=getSpecificOutliersStep1(expressionSpeCondExample,
fit=fit1$fit1, param.detection, multitest.correction.method="BY",
prefix.file="run1_Step1", print.hist.pv=FALSE)
fit2=fitNoPriorWithExclusion(expressionSpeCondExample,
specificOutlierStep1=specificOutlierStep1, param.detection=param.detection)
specificResult=getSpecificResult(expressionSpeCondExample, fit=fit2,
specificOutlierStep1=specificOutlierStep1, param.detection,
multitest.correction.method="BY", prefix.file="run1_Step2",
print.hist.pv=FALSE)
Run the code above in your browser using DataLab