,
Victor Kummritz [aut]| Title: | Global Value Chains Tools |
|---|---|
| Description: | Several tools for Global Value Chain ('GVC') analysis are implemented. |
| Authors: | Bastiaan Quast [aut, cre] ,
Victor Kummritz [aut] |
| Maintainer: | Bastiaan Quast <[email protected]> |
| License: | GPL-3 |
| Version: | 6.4.0 |
| Built: | 2024-10-21 03:16:29 UTC |
| Source: | https://github.com/bquast/gvc |
Domestic Final Demand Domestic Value Added
dfddva(x, aggregate = FALSE)dfddva(x, aggregate = FALSE)
x |
A Leontief decomposed Inter-Country Input Output table as created by decompr, which should be post multiplied with final demand (using the parameter: post="final_demand") |
aggregate |
should dfddva be aggregated along source industries to a national sum? |
# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "final_demand") # apply dfddva dfddva( l )# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "final_demand") # apply dfddva dfddva( l )
Domestic Final Demand Foreign Value Added
dfdfva(x, aggregate = FALSE)dfdfva(x, aggregate = FALSE)
x |
A Leontief decomposed Inter-Country Input Output table as created by decompr, which should be post multiplied with final demand (using the parameter: post="final_demand") |
aggregate |
should dfddva be aggregated along source industries to a national sum? |
# load the decompr package library(decompr) # load the example data data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "final_demand") # apply dfdfva dfdfva( l )# load the decompr package library(decompr) # load the example data data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "final_demand") # apply dfdfva dfdfva( l )
Downstreamness
downstream(x)downstream(x)
x |
an object of class "decompr" as created using the load_tables_vectors() function from the decompr package. |
# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- load_tables_vectors(x = inter, y = final, k = countries, i = industries, o = out ) # apply downstream downstream( l )# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- load_tables_vectors(x = inter, y = final, k = countries, i = industries, o = out ) # apply downstream downstream( l )
Exporting to Re-export
e2r(x, by = NULL, subset = NULL)e2r(x, by = NULL, subset = NULL)
x |
A Leontief decomposed Inter-Country Input Output table as created by decompr |
by |
variable to subset by |
subset |
value(s) of the subset variable to select |
# load the decompr package library(decompr) # load the example data set data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out) # apply the Exporting to Re-export e2r( l )# load the decompr package library(decompr) # load the example data set data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out) # apply the Exporting to Re-export e2r( l )
Foreign Final Demand Domestic Value Added
ffddva(x, aggregate = FALSE)ffddva(x, aggregate = FALSE)
x |
A Leontief decomposed Inter-Country Input Output table as created by decompr, which should be post multiplied with final demand (using the parameter: post="final_demand") |
aggregate |
should dfddva be aggregated along source industries to a national sum? |
# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "final_demand") # apply ffddva ffddva( l )# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "final_demand") # apply ffddva ffddva( l )
Several tools for Global Value Chain ('GVC') analysis are implemented.
Bastiaan Quast [email protected] Victor Kummritz
Wang, Zhi, Shang-Jin Wei, and Kunfu Zhu. Quantifying international production sharing at the bilateral and sector levels. No. w19677. National Bureau of Economic Research, 2013.
https://qua.st/decompr
Importing to Export
Vertical Specialization
Vertical Specialisation
i2e(x, by = NULL, subset = NULL) vertical_specialisation(x, by = NULL, subset = NULL) vertical_specialization(x, by = NULL, subset = NULL)i2e(x, by = NULL, subset = NULL) vertical_specialisation(x, by = NULL, subset = NULL) vertical_specialization(x, by = NULL, subset = NULL)
x |
A Leontief decomposed Inter-Country Input Output table as created by decompr |
by |
variable to subset by |
subset |
value(s) of the subset variable to select |
# load the decompr package library(decompr) # load the example data set data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out) # apply the Import to Exports analysis i2e( l )# load the decompr package library(decompr) # load the example data set data(leather) attach(leather) # create a leontief decomposed data set l <- decomp(x = inter, y = final, k = countries, i = industries, o = out) # apply the Import to Exports analysis i2e( l )
New Revealed Comparative Advantage
nrca(x)nrca(x)
x |
A decomposed Inter-Country Input Output table as created by decompr |
# load the decompr package library(decompr) # load the example data set data(leather) attach(leather) # perform Leontief decomposition l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "exports" ) # load gvc package library(gvc) # perform New Revealed Comparative Advantage nrca(l)# load the decompr package library(decompr) # load the example data set data(leather) attach(leather) # perform Leontief decomposition l <- decomp(x = inter, y = final, k = countries, i = industries, o = out, method = "leontief", post = "exports" ) # load gvc package library(gvc) # perform New Revealed Comparative Advantage nrca(l)
Upstreamness
upstream(x)upstream(x)
x |
an object of class "decompr" as created using the load_tables_vectors() function from the decompr package. |
# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- load_tables_vectors(x = inter, y = final, k = countries, i = industries, o = out ) # apply upstream upstream( l )# load the decompr package library(decompr) # load example data data(leather) attach(leather) # create a leontief decomposed data set l <- load_tables_vectors(x = inter, y = final, k = countries, i = industries, o = out ) # apply upstream upstream( l )