# NOT RUN {
# 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 )
# }
Run the code above in your browser using DataLab