From 13b87ef4302174ff8abf6d57b30a322f730bf326 Mon Sep 17 00:00:00 2001 From: Lavinia Baumstark Date: Thu, 14 Mar 2024 11:21:19 +0100 Subject: [PATCH] delete p21_taxrevTech0, which was deleted in the GAMS code --- R/reportTax.R | 4 ---- 1 file changed, 4 deletions(-) diff --git a/R/reportTax.R b/R/reportTax.R index 9f119320..e924178a 100644 --- a/R/reportTax.R +++ b/R/reportTax.R @@ -224,10 +224,6 @@ reportTax <- function(gdx,output=NULL,regionSubsetList=NULL,t=c(seq(2005,2060,5) p21_taxrevPE2SE0 <- readGDX(gdx, name=c("p21_taxrevPE2SE0"), format= "first_found")[,t,]*1000 out <- mbind(out, setNames(p21_taxrevPE2SE0,"Net Taxes|PE2SE Technologies (billion US$2005/yr)")) - #technology specific new capacity subsidies or taxes revenue - p21_taxrevTech0 <- readGDX(gdx, name=c("p21_taxrevTech0"), format= "first_found")[,t,]*1000 - out <- mbind(out, setNames(p21_taxrevTech0,"Net Taxes|Technologies delta cap (billion US$2005/yr)")) - # exports tax p21_taxrevXport0 <- readGDX(gdx, name=c("p21_taxrevXport0"), format= "first_found")[,t,]*1000 out <- mbind(out, setNames(p21_taxrevXport0,"Net Taxes|Exports (billion US$2005/yr)"))