Load the library.

library(wiod)

Load the data.

data("wiot_1995")

Load the decompr package.

library(decompr)

Apply the leontief decomposition and save the output to an object l1995.

l1995 <- decomp(wiot_1995$inter,
                wiot_1995$final,
                wiot_1995$countries,
                wiot_1995$industries,
                wiot_1995$output,
                method = "leontief" )


bquast/wiod documentation built on May 30, 2021, 5:21 a.m.