## Not run:
# data(expressionSetList)
# xparam <- new("XdeParameter", phenotypeLabel="adenoVsquamous", esetList=expressionSetList)
# iterations(xparam) <- 10
# fit <- xde(xparam, esetList=expressionSetList)
# ## End(Not run)
Run the code above in your browser using DataLab