Nothing
fn2fix <-
function(i,posx, PA=FALSE, NumProcess=2, type='Poisson', dist='normal',
lambdaMarg=NULL, lambdaParent=NULL, lambdaNumP=NULL, sigmaC=1,
minC=-1, maxC=1,fixed.seed=1)
{
fixed.seed<-fixed.seed+i
aux<-DistSimfix(posx=posx, NumProcess=NumProcess, type=type,
dist=dist, lambdaMarg=lambdaMarg,
lambdaParent=lambdaParent, lambdaNumP=lambdaNumP, sigmaC=sigmaC,
minC=minC, maxC=maxC, PA=PA, info=FALSE,fixed.seed=fixed.seed)
return(aux)
}
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.