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