R/SimulateFD.R

`SimulateFD` <-
function(n, d){
    stopifnot(d < 0.5, n>1)
    r<-acvfFD(d, n-1)
    z<-try(DHSimulate(n, r), silent=TRUE)
    if(class(z)=="try-error") z<-DLSimulate(n, r)
    z
}

Try the FGN package in your browser

Any scripts or data that you put into this service are public.

FGN documentation built on May 30, 2017, 7:19 a.m.