Title: | Input-Output Analysis |
---|---|
Description: | An implementation of the Input-Output model developed by Wassily Leontief that represents the interdependencies between different sectors of a national economy or different regional economies. |
Authors: | Mauricio Vargas [aut, cre] , Victor Falkenheim [ths], Central Bank of Chile [dtc], University of Bio-Bio [dtc] |
Maintainer: | Mauricio Vargas <[email protected]> |
License: | MIT + file LICENSE |
Version: | 0.3 |
Built: | 2024-11-09 04:22:36 UTC |
Source: | https://github.com/pachadotdev/leontief |
Augmented input requirement
augmented_input_requirement(X, w, c, d)
augmented_input_requirement(X, w, c, d)
X |
transaction matrix |
w |
wage vector |
c |
household consumption vector |
d |
final demand vector |
set.seed(200100) X <- matrix(rnorm(100), nrow = 10) w <- rnorm(10) c <- rnorm(10) d <- rnorm(10) augmented_input_requirement(X, w, c, d)
set.seed(200100) X <- matrix(rnorm(100), nrow = 10) w <- rnorm(10) c <- rnorm(10) d <- rnorm(10) augmented_input_requirement(X, w, c, d)
Backward linkage
backward_linkage(A)
backward_linkage(A)
A |
input requirement matrix |
Employment matrix (2013 data) This matrix contains the employed people by industry and the employment coefficient that is the number of people divided by the total final demand from the wage and demand matrix.
wage_demand_matrix
wage_demand_matrix
A matrix with 12 rows and 2 columns
University of Bio-Bio, based on data from the National Bureau of Statistics
http://revistas.ubiobio.cl/index.php/HHEE/article/download/3441/3473/
Employment multiplier
employment_multiplier(L, e)
employment_multiplier(L, e)
L |
Leontief inverse matrix |
e |
employment coefficients vector |
Employment number
employment_number(L, e, c)
employment_number(L, e, c)
L |
Leontief inverse matrix |
e |
employment coefficients vector |
c |
change in final demand |
Equilibrium output
equilibrium_output(L, d)
equilibrium_output(L, d)
L |
Leontief inverse matrix |
d |
final demand vector |
set.seed(200100) L <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) equilibrium_output(L, d)
set.seed(200100) L <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) equilibrium_output(L, d)
Forward linkage
forward_linkage(A)
forward_linkage(A)
A |
input requirement matrix |
Income multiplier
income_multiplier(L, w)
income_multiplier(L, w)
L |
Leontief inverse matrix |
w |
wage vector |
Input requirement
input_requirement(X, d)
input_requirement(X, d)
X |
transaction matrix |
d |
final demand vector |
set.seed(200100) X <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) input_requirement(X, d)
set.seed(200100) X <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) input_requirement(X, d)
Leontief inverse
leontief_inverse(A)
leontief_inverse(A)
A |
input requirement matrix |
set.seed(200100) A <- matrix(rnorm(100), nrow = 10) leontief_inverse(A)
set.seed(200100) A <- matrix(rnorm(100), nrow = 10) leontief_inverse(A)
Multiplier product matrix
multiplier_product_matrix(L)
multiplier_product_matrix(L)
L |
Leontief inverse matrix |
Output allocation
output_allocation(X, d)
output_allocation(X, d)
X |
transaction matrix |
d |
final demand vector |
set.seed(200100) X <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) output_allocation(X, d)
set.seed(200100) X <- matrix(rnorm(100), nrow = 10) d <- rnorm(10) output_allocation(X, d)
Output multiplier
output_multiplier(L)
output_multiplier(L)
L |
Leontief inverse matrix |
set.seed(200100) L <- matrix(rnorm(100), nrow = 10) output_multiplier(L)
set.seed(200100) L <- matrix(rnorm(100), nrow = 10) output_multiplier(L)
Power of dispersion
power_dispersion(L)
power_dispersion(L)
L |
Leontief inverse matrix |
Power of dispersion coefficient of variation
power_dispersion_cv(L)
power_dispersion_cv(L)
L |
Leontief inverse matrix |
Sensitivity of dispersion coefficient of variation
sensitivity_dispersion(L)
sensitivity_dispersion(L)
L |
Leontief inverse matrix |
Sensititivy of dispersion coefficient of variation
sensitivity_dispersion_cv(L)
sensitivity_dispersion_cv(L)
L |
Leontief inverse matrix |
Transaction matrix (2013 data) This matrix contains the production of the chilean economy divided into 12 industries. The measuring unit is CLP million of the year 2013
transaction_matrix
transaction_matrix
A matrix with 12 rows and 12 columns
Central Bank of Chile
https://si3.bcentral.cl/estadisticas/Principal1/Excel/CCNN/cdr/excel.html
Wage and demand matrix (2013 data) This matrix contains the wage, intermediate demand and disaggregated final demand of the chilean economy divided into 12 industries. The final demand is given by components (household consumption, government consumption, etc.) and aggregated. The measuring unit is CLP million of the year 2013.
wage_demand_matrix
wage_demand_matrix
A matrix with 12 rows and 9 columns
Central Bank of Chile
https://si3.bcentral.cl/estadisticas/Principal1/Excel/CCNN/cdr/excel.html