Output multiplier

output_multiplier(L)

Arguments

L

Leontief inverse matrix

Examples

set.seed(200100)
L <- matrix(rnorm(100), nrow = 10)
output_multiplier(L)
#>             [,1]
#>  [1,] -0.2686900
#>  [2,] -2.7609893
#>  [3,]  2.8614203
#>  [4,] -2.3588436
#>  [5,]  0.9993392
#>  [6,]  0.4331590
#>  [7,] -1.4089628
#>  [8,] -2.4027164
#>  [9,] -4.6124833
#> [10,]  2.2191186