## Not run: 
# ###################################################
# ####             Full example                  ####
# ###################################################
# 
# results <- BDA(data = FFfactors, spec = (VOO~SP500),
#                horizon = 250, doplot = TRUE)
# print(results)
# ## End(Not run)
###################################################
####        CRAN-compatible example            ####
###################################################
results <- BDA(data = FFfactors[nrow(FFfactors):(nrow(FFfactors)-300),], 
               spec = (VOO~SP500),horizon = 250, doplot = FALSE)
print(results)
message("NOTE: This is a shortened example. Reference the manual for more complex examples")
Run the code above in your browser using DataLab