set.seed(1)
Dat = gen.Network(p = 10, Nsub = 5,
sparsity = .2, REsize=10, REprob=.5,
REnoise = 1, Nobs=20)
CVs = cv.MNS(dat = Dat, l1range = seq(.1, .5, length.out=10),
alpharange = seq(.2, .8, length.out = 5),
parallel = FALSE, verbose = TRUE)
Run the code above in your browser using DataLab