Update site and create a release

JGCRI · Jan 28, 2024 · 36a52cc · 36a52cc
1 parent 7f952e6
commit 36a52cc
Show file tree

Hide file tree

Showing 4 changed files with 32 additions and 7 deletions.
diff --git a/docs/articles/vignette_news.html b/docs/articles/vignette_news.html
diff --git a/docs/articles/vignette_visualization.html b/docs/articles/vignette_visualization.html
diff --git a/vignettes/vignette_news.Rmd b/vignettes/vignette_news.Rmd
@@ -15,6 +15,15 @@ knitr::opts_chunk$set(
 )
 ```
 
+2023-1-28
+
+* The first version of gcamfaostat is still being processed/reviewed at JOSS
+* We now create a release version to have a snapshot of this version (replicating the processing for GCAM v7.0 AgLU in data)
+* Next stages of development:
+  (1) BYU: GCAM base year update to 2021 and 
+  (2) PCE: primary commodity equivalent processing and method documentation
+* Possibly adding IFPRI SPAM data in the processing chain  
+
 # November 2023 updates
 
 # **JOSS submission**
@@ -29,6 +38,7 @@ knitr::opts_chunk$set(
 # We will now update gcamfaostat to include the latest data and for GCAM BYU
 # A new **BYU branch** is created for this task
 
+
 2023-11-08
 
 * All Github Action test passed. Badges added!

diff --git a/vignettes/vignette_visualization.Rmd b/vignettes/vignette_visualization.Rmd
@@ -43,7 +43,7 @@ Food calories availability per capita per day grouped by GCAM regions and commod
 ***
 ## Yield growth
 
-![Surprisingly, oil palm fruit yield did grow at regional levels (boxplot) in the past 30 years. But world yield increased by ~50% due to the production shift to high-yielding regions. The opposite is true for root and tuber crops](../man/figures/Fig_WorldYield.png){width=100%}
+![Surprisingly, oil palm fruit yield did not grow at regional levels (boxplot) in the past 30 years. But world yield increased by ~50% due to the production shift to high-yielding regions. The opposite is true for root and tuber crops](../man/figures/Fig_WorldYield.png){width=100%}
 
 ***
 
@@ -122,7 +122,7 @@ BaseYear <- c(2013:2017)
 ``` {r, eval =FALSE}
 # simplify population data
 OA %>% filter(element_code == 511, item_code == 3010) %>%
-  transmute(area, area_code, year, pop = value) %>% 
+  transmute(area, area_code, year, value = value / length(BaseYear)) %>% 
   filter(year %in% BaseYear) %>% 
   gcamdata::left_join_error_no_match(AGLU_ctry %>% select(area = FAO_country, iso), by = "area") %>%
   gcamdata::left_join_error_no_match(iso_GCAM_regID %>% select(iso, GCAM_region_ID), by = "iso") %>%