supplementary_add | R Documentation |
Add supplementary data to a SIOT, a use, supply or margins table.
supplementary_add(data_table, supplementary_data, supplementary_names = NULL)
data_table |
A SIOT, a use table, a supply table, or a margins table. |
supplementary_data |
Supplementary data to be added.
It must be a data.frame
or tibble with a key column containing the indicator's name,
and the column names must match with the |
supplementary_names |
Optional names for the new supplementary rows.
Defaults to |
This function is a wrapper around the more general rows_add
function.
An extended data_table
with the new row(s) binded.
A symmetric input-output table with supplementary data, of data.frame class. The column names are ordered, and the row names are in the first, auxiliary metadata column.
Other iotables processing functions:
conforming_vector_create()
,
household_column_get()
,
iotable_year_get()
,
key_column_create()
,
matrix_round()
,
output_get()
,
primary_input_get()
,
rows_add()
,
total_tax_add()
,
vector_transpose_longer()
,
vector_transpose_wider()
de_io <- iotable_get() CO2_coefficients <- data.frame(agriculture_group = 0.2379, industry_group = 0.5172, construction = 0.0456, trade_group = 0.1320, business_services_group = 0.0127, other_services_group = 0.0530) CH4_coefficients <- data.frame(agriculture_group = 0.0349, industry_group = 0.0011, construction = 0, trade_group = 0, business_services_group = 0, other_services_group = 0.0021) CO2 <- cbind (data.frame(iotables_row = "CO2"), CO2_coefficients) CH4 <- cbind(data.frame (iotables_row = "CH4_coefficients"), CH4_coefficients) de_coeff <- input_coefficient_matrix_create ( iotable_get() ) emissions <- rbind (CO2, CH4) # Check with the Eurostat Manual page 494: supplementary_add(de_io, emissions)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.