# Generating Non-contaminated normal BAR(1) tree and calculating the bias corrected
# standard normal CI for the autoregressive coefficients of the BAR(1) model
# Note that in this example (B=2) for speeding up the calculations.
# B must be set to 499 or more for calculation accuracy.
z <- bfa_tree_gen(15, 1, 1, 1, -0.9, -0.9, 0, 10, c(-0.5))
bfa_ls_bc_ci(z, p=1, method="boot1", B=2)
Run the code above in your browser using DataLab