iotables (version 0.9.4)

multiplier_create: Create multipliers

Description

Wrapper around equation_solve() that computes total multipliers by post-multiplying an input indicator vector with a Leontief inverse and adds a key column carrying the multiplier name for consistent joins.

Usage

multiplier_create(
  input_vector,
  Im,
  multiplier_name = "multiplier",
  digits = NULL
)

Value

A data frame with:

• a first key column (character) named as the first column of input_vector and filled with multiplier_name, and

• one numeric column per product/industry containing the multipliers.

Arguments

input_vector

A named numeric vector (or 1-column matrix) created by input_indicator_create() whose names match the ordering of the Leontief inverse columns.

Im

A Leontief inverse matrix created by leontief_inverse_create(). Column names must correspond to products or industries consistent with input_vector.

multiplier_name

A string used for the key column that labels the returned multipliers. Default is "multiplier".

digits

Optional integer. If supplied and non-negative, round the resulting multipliers to this number of decimal places. Negative values are ignored (no rounding).

Details

In the Eurostat IO framework, multipliers measure total effects per unit of final demand, by product or industry (via the Leontief inverse \((I - A)^{-1}\)). This contrasts with direct effects, which reflect only the immediate (first-round) impact.

The function delegates the numerical solve to equation_solve() and then formats the result for tidy joining with other IO tables. Ensure that the dimension ordering and names of input_vector and Im correspond; otherwise results will be misaligned.

See Also

equation_solve(), input_indicator_create(), leontief_inverse_create()

Other multiplier functions: input_multipliers_create(), output_multiplier_create()

Examples

# Minimal workflow -----------------------------------------------
data_table <- iotable_get()

coeff_de <- input_coefficient_matrix_create(data_table)

de_gva_indicator <- input_indicator_create(
  data_table = data_table,
  input = "gva"
)

I_de <- leontief_inverse_create(coeff_de)

de_gva_multipliers <- multiplier_create(
  input_vector = de_gva_indicator,
  Im = I_de,
  multiplier_name = "employment_multiplier",
  digits = 4
)