powered by
mulOptPlot(M.Opt, ind, th, smooth = "NO")
mulOptPlot
data(benchVign) mulcom_perm <- mulPerm(Affy, Affy$Groups, 10,2) mulcom_opt <- mulOpt(mulcom_perm, vm=seq(0.1, 0.5, 0.1), vt=seq(1, 3,1)) mulOptPlot(mulcom_opt, 1, 0.05)
Run the code above in your browser using DataLab