powered by
Equilibrium output
equilibrium_output(L, d)
Leontief inverse matrix
final demand vector
set.seed(200100) L <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) equilibrium_output(L, d)
Run the code above in your browser using DataLab