Nothing
## -----------------------------------------------------------------------------
# load the decompr package
library(decompr)
## -----------------------------------------------------------------------------
# load the example data set
data(leather)
attach(leather)
## -----------------------------------------------------------------------------
l <- decomp(x = inter,
y = final,
k = countries,
i = industries,
o = out,
method = "leontief",
post = "exports" )
## -----------------------------------------------------------------------------
library(gvc)
## -----------------------------------------------------------------------------
nrca(l)
## -----------------------------------------------------------------------------
i2e(l)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.