}
),
prepareArgs = function(fargs, index) {
library(morpheus)
io = generateSampleIO(fargs$n, fargs$p, fargs$beta, fargs$b, fargs$link)
fargs$M <- computeMoments(io$X, io$Y)
}
),
prepareArgs = function(fargs, index) {
library(morpheus)
io = generateSampleIO(fargs$n, fargs$p, fargs$beta, fargs$b, fargs$link)
fargs$M <- computeMoments(io$X, io$Y)