# NOT RUN {
# generate some data
dat <- generateMed(a = (1:10)/20, b = (1:10)/20)
cmfilter:::cmfast(dat$x, dat[,-c(1, 12)], dat$y, nStarts = 100, nCores = 2,
cutoff = 0.5, maxIter = 25, stableLag = 5, p.value = 0.1,
pb = FALSE)
# }
Run the code above in your browser using DataLab