meboot (x, reps=999, trim=list(trim=0.10, xmin=NULL, xmax=NULL), reachbnd=TRUE, expand.sd=TRUE, force.clt=TRUE, scl.adjustment = FALSE, sym = FALSE, elaps=FALSE, colsubj, coldata, coltimes, ...)ts object or pdata.frame object.trim, the trimming proportion;
xmin, the lower limit for left tail and xmax, the upper limit for right tail.TRUE potentially reached bounds (xmin = smallest value - trimmed mean and xmax=largest value + trimmed mean) are given when the random draw happens to be equal to 0 and 1, respectively.TRUE the standard deviation in the ensemble in expanded. See expand.sd.TRUE the ensemble is forced to satisfy the central limit theorem. See force.clt.TRUE scale adjustment is performed
to ensure that the population variance of the transformed series equals the variance of the data.TRUE an adjustment is peformed to ensure that the ME density is symmetric.TRUE elapsed time during computations is displayed.x that contains the individual index. It is ignored if the input data x is not a pdata.frame object.x that contains the data of the variable to create the ensemble. It is ignored if the input data x is not a pdata.frame object.x is not a pdata.frame object.fiv to be passed to expand.sd.xmin) and upper limit for right tail (xmax). This is done by computing the trim (e.g. 10
The scale and symmetry adjustments are described in Vinod (2013) referenced below.
In some applications, the ensembles must be ensured to be non-negative.
Setting trim$xmin = 0 ensures positive values of the ensembles. It also
requires force.clt = FALSE and expand.sd = FALSE. These arguments are
set to FALSE if trim$xmin = 0 is defined and a warning is returned
to inform that the value of those arguments were overwritten.
Note: The choice of xmin and xmax cannot be arbitrary and should be
cognizant of range(x) in data. Otherwise, if there are observations outside those
bounds, the limits set by these arguments may not be met.
If the user is concerned only with the trimming proportion, then it can be passed as argument
simply trim = 0.1 and the default values for xmin and xmax will be used.
Vinod, H.D. (2006), Maximum Entropy Ensembles for Time Series Inference in Economics, Journal of Asian Economics, 17(6), pp. 955-978
Vinod, H.D. (2004), Ranking mutual funds using unconventional utility theory and stochastic dominance, Journal of Empirical Finance, 11(3), pp. 353-377.
## Ensemble for the AirPassenger time series data
set.seed(345)
out <- meboot(x=AirPassengers, reps=100, trim=0.10, elaps=TRUE)
## Ensemble for T=5 toy time series used in Vinod (2004)
set.seed(345)
out <- meboot(x=c(4, 12, 36, 20, 8), reps=999, trim=0.25, elaps=TRUE)
mean(out$ens) # ensemble mean should be close to sample mean 16
Run the code above in your browser using DataLab