R/resamp.R

Defines functions resamp

resamp <-
function(e)
{
n <- nrow(e)
random <- runif(n)
index <- as.integer(1+n*random)
es <- e[index, , drop=FALSE]
return(es)
}

Try the VAR.etp package in your browser

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

VAR.etp documentation built on Aug. 31, 2023, 9:08 a.m.