Load the library.
library(wiod)
Load the data.
data("wiod95")
Load the decompr package.
library(decompr)
## If you use decompr for data analysis,
## please cite both R and decompr,
## using citation() and citation("decompr") respectively.
Apply the leontief decomposition and save the output to an object l1995.
l1995 <- decomp(inter95,
final95,
countries,
industries,
output95,
method = "leontief" )