library(netClass)
data(expr)
data(ad.matrix)
x <- expr$genes
y <- expr$y
library(KEGG.db)
r.aep <- aep.cv(x[,1:200], y, folds=3, repeats=1, parallel=FALSE,cores=2,Gsub=ad.matrix,
Cs=10^(-3:3),seed=1234,DEBUG=TRUE)Run the code above in your browser using DataLab