convert unit

pik-piam · Oct 16, 2023 · 0afb4f2 · 0afb4f2
1 parent 4fb3421
commit 0afb4f2
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 3 deletions.
diff --git a/R/convertGlobalEnergyMonitor.R b/R/convertGlobalEnergyMonitor.R
@@ -19,6 +19,7 @@ convertGlobalEnergyMonitor <- function(x) {
     "The Gambia" = "GMB",
     "Virgin Islands (U_S_)" = "VIR"
   )
-  getItems(x, dim = 1) <- toolCountry2isocode(getItems(x, dim = 1), mapping = mapping)
+  getItems(x, dim = 1) <- toolCountry2isocode(getItems(x, dim = 1),
+                                              mapping = mapping, warn = FALSE)
   return(toolCountryFill(x, no_remove_warning = "KOS"))
 }
diff --git a/R/readGlobalEnergyMonitor.R b/R/readGlobalEnergyMonitor.R
@@ -124,8 +124,9 @@ readGlobalEnergyMonitor <- function() {
       mutate(
         !!sym("scenario") := "historical",
         !!sym("model") := "Global Energy Outlook",
-        !!sym("unit") := "MW",
-        !!sym("variable") := nb$variable
+        !!sym("unit") := "GW",
+        !!sym("variable") := nb$variable,
+        !!sym("value") := !!sym("value") / 1000
       ) %>%
       select("model", "scenario", "region", "period", "variable", "unit", "value")