Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
38 changes: 32 additions & 6 deletions R/gmd.R
Original file line number Diff line number Diff line change
Expand Up @@ -72,28 +72,53 @@ gmd <- function(variables = NULL, country = NULL, version = NULL,
"cons" = "Total Consumption",
"rcons" = "Real Total Consumption",
"cons_GDP" = "Total Consumption as % of GDP",
"cons_USD" = "Total Consumption in USD",
"inv" = "Total Investment",
"inv_GDP" = "Total Investment as % of GDP",
"inv_USD" = "Total Investment in USD",
"finv" = "Fixed Investment",
"finv_GDP" = "Fixed Investment as % of GDP",
"finv_USD" = "Fixed Investment in USD",
"exports" = "Total Exports",
"exports_GDP" = "Total Exports as % of GDP",
"exports_USD" = "Total Exports in USD",
"imports" = "Total Imports",
"imports_GDP" = "Total Imports as % of GDP",
"imports_USD" = "Total Imports in USD",
"CA" = "Current Account Balance",
"CA_GDP" = "Current Account Balance as % of GDP",
"USDfx" = "Exchange Rate against USD",
"REER" = "Real Effective Exchange Rate, 2010 = 100",
"govexp" = "Government Expenditure",
"govexp" = "Consolidated government Expenditure",
"gen_govexp" = "General government Expenditure",
"gen_govexp_GDP" = "General gentral government Expenditure as % of GDP",
"cgovexp" = "Central government Expenditure",
"cgovexp_GDP" = "Central government Expenditure as % of GDP",
"cgovrev" = "Central government Revenue",
"gen_govrev" = "General government Revenue",
"gen_govrev_GDP" = "General government Revenue as % of GDP",
"cgovrev_GDP" = "Central government Revenue as % of GDP",
"govexp_GDP" = "Government Expenditure as % of GDP",
"govrev" = "Government Revenue",
"govrev" = "Consolidated government Revenue",
"govrev_GDP" = "Government Revenue as % of GDP",
"govtax" = "Government Tax Revenue",
"govtax" = "Consolidated government Tax Revenue",
"gen_govtax" = "General government Tax Revenue",
"cgovtax" = "Central government Tax Revenue",
"gen_govtax_GDP" = "General government Tax Revenue as % of GDP",
"cgovtax_GDP" = "Central government Tax Revenue as % of GDP",
"govtax_GDP" = "Government Tax Revenue as % of GDP",
"govdef" = "Government Deficit",
"govdef" = "Consolidated government Deficit",
"govdef_GDP" = "Government Deficit as % of GDP",
"govdebt" = "Government Debt",
"gen_govdef_GDP" = "General government Deficit as % of GDP",
"gen_govdef" = "General government Deficit",
"cgovdef_GDP" = "Central government Deficit as % of GDP",
"cgovdef" = "Central government Deficit",
"govdebt" = "Consolidated government Debt",
"govdebt_GDP" = "Government Debt as % of GDP",
"gen_govdebt_GDP" = "General government Debt as % of GDP",
"gen_govdebt" = "General government Debt",
"cgovdebt_GDP" = "Central government Debt as % of GDP",
"cgovdebt" = "Central government Debt",
"HPI" = "House Price Index",
"CPI" = "Consumer Price Index, 2010 = 100",
"infl" = "Inflation Rate",
Expand All @@ -109,7 +134,8 @@ gmd <- function(variables = NULL, country = NULL, version = NULL,
"M4" = "M4 Money Supply",
"SovDebtCrisis" = "Sovereign Debt Crisis",
"CurrencyCrisis" = "Currency Crisis",
"BankingCrisis" = "Banking Crisis"
"BankingCrisis" = "Banking Crisis",
"CA_USD" = ""
)

df <- data.frame(
Expand Down