From 9d8f09401fa453f2d5d73bc64360a2cfddb1e8e4 Mon Sep 17 00:00:00 2001 From: Ben Young Date: Mon, 26 Feb 2024 10:56:28 -0500 Subject: [PATCH] fix error in unnamed lcia results for households --- R/CalculationFunctions.R | 1 + 1 file changed, 1 insertion(+) diff --git a/R/CalculationFunctions.R b/R/CalculationFunctions.R index bff444ab..5ed21e74 100644 --- a/R/CalculationFunctions.R +++ b/R/CalculationFunctions.R @@ -128,6 +128,7 @@ calculateResultsWithExternalFactors <- function(model, perspective = "FINAL", de hh = t(as.matrix(model$B_h[, codes])) * colSums(as.matrix(model$U[, codes])) hh_lcia = t(model$C %*% as.matrix(model$B_h[, codes])) * colSums(as.matrix(model$U[, codes])) rownames(hh) <- codes + rownames(hh_lcia) <- codes # Calculate Final perspective results if(perspective == "FINAL"){