# NOT RUN {
# Scale the entries of a vector to the interval [0,1]
# NOT RUN {
# }
# NOT RUN {
# Load data
data("data_stock_returns")
data("data_state_variables")
# Compute CoVaR_i_q_t , Delta_CoVaR_i_q_t and Delta_CoVaR_t
l_result <- f_CoVaR_Delta_CoVaR_i_q_t(data_stock_returns, data_state_variables)
# Plot Delta_CoVaR_t
f_plot(l_result$Delta_CoVaR_t)
# }
# NOT RUN {
# }
# }
Run the code above in your browser using DataLab