leontief (version 0.2)

equilibrium_output: Equilibrium output

Description

Equilibrium output

Usage

equilibrium_output(L, d)

Arguments

L

Leontief inverse matrix

d

final demand vector

Examples

# NOT RUN {
set.seed(200100)
L <- matrix(rnorm(100), nrow = 10)
d <- rnorm(10)
equilibrium_output(L,d)
# }