Nothing
`fun.RMFMKL.ml` <-
function (data, fmkl.init = c(-0.25, 1.5), leap = 3, FUN = "runif.sobol",no=10000)
{
RMFMKL <- fun.fit.gl.v3(a=fmkl.init[1], b=fmkl.init[2], data=data, fun=fun.auto.mm.fmkl, no=no,
leap = leap, FUN = FUN)$unique.optim.result
RMFMKL <- fun.fit.gl.v3a(RMFMKL[1], RMFMKL[2], RMFMKL[3],
RMFMKL[4], data, "fmkl")
return(RMFMKL)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.