data(doseData)
data(geneData)
dirData <- monotoneDirection(geneData = geneData,doseData = doseData)
incData <- as.data.frame(dirData$incData)
print(orcme <- ORCME(DRdata=incData,lambda=0.15,phi=2))
orcmeRobust <- ORCME(DRdata=incData,lambda=0.15,phi=2, robust=TRUE)
# number of genes within cluster
colSums(orcme)
colSums(orcmeRobust)
Run the code above in your browser using DataLab