# NOT RUN {
# Toy Example
control <- createControl(upper.mean = 13, lower.mean = 5,
upper.sd = 1, lower.sd = 1, n.features = 20,
subtype1.feats = 1:5,
subtype2.feats = 6:10,
subtype3.feats = 11:15)
# }
Run the code above in your browser using DataLab