# NOT RUN {
# NOT RUN {
# Load data
data("data_efficient_portfolios_returns")
# Prepare variables
v_port <- data_efficient_portfolios_returns[,2]
v_bench <- data_efficient_portfolios_returns[,1]
# Compute RSRL
f_RSRL(v_port, v_bench, FALSE, 0.95)
# Compute mRSRL
f_RSRL(v_port, v_bench, TRUE, 0.95)
# }
# }
Run the code above in your browser using DataLab