## Not run: 
#    data("BoutrosRNAi2002")
#    D <- BoutrosRNAiDiscrete[,9:16]   
#    nem.consensus(D, control=set.default.parameters(unique(colnames(D)), para=c(0.13,0.05)))            
# ## End(Not run)
Run the code above in your browser using DataLab