From f9f1ab437de25c41a620622201eac9af40a16054 Mon Sep 17 00:00:00 2001 From: WesIngwersen Date: Fri, 16 Aug 2024 09:51:36 -0400 Subject: [PATCH] should be rbind because in d the results are transposed --- R/CalculationFunctions.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/CalculationFunctions.R b/R/CalculationFunctions.R index 0fd98a30..982563f9 100644 --- a/R/CalculationFunctions.R +++ b/R/CalculationFunctions.R @@ -217,7 +217,7 @@ calculateResultsWithExternalFactors <- function(model, perspective = "FINAL", de # colSums(z) == colSums(r2) r2 <- z } - result$LCI_d <- cbind(r1, r2 + r3) # Term 2 and Term 3 are assigned to RoW + result$LCI_d <- rbind(r1, r2 + r3) # Term 2 and Term 3 are assigned to RoW } else { result$LCI_d <- r1 + r2 + r3 # All three terms combined and regions do not change }