if (FALSE) {
# This function is typically called internally by scenarios()
# Example usage with simulated data:
big_b <- array(rnorm(9*4*10), dim = c(9, 4, 10))
big_M <- array(rnorm(9*9*10), dim = c(9, 9, 10))
result <- full_scenarios_core(big_b, big_M, obs = 1:2,
path = c(1.0, 1.1), shocks = NA,
h = 2, n_var = 3)
}
Run the code above in your browser using DataLab