New-test-suite

.Rbuildignore

@@ -1,5 +1,6 @@
 ^renv$
 ^renv\.lock$
+^\.cg-docs$
 ^pipapi\.Rproj$
 ^\.Rproj\.user$
 ^LICENSE\.md$

.gitignore

@@ -12,3 +12,30 @@ logs/
 demo.duckdb*
 /doc/
 /Meta/
+
+# Compound GPID (junction + backup - neither should be committed)
+.github
+.github.bak
+
+
+# Compound GPID local config (user-specific, never commit)
+compound-gpid.local.md
+
+# Compound GPID managed items (junctions + copied file + knowledge base - do not commit)
+.github/prompts/
+.github/skills/
+.github/agents/
+.github/instructions/
+.github/copilot-instructions.md
+.cg-docs/
+
+tests/testdata/snapshots/snap_agg_all_2015.rds
+tests/testdata/snapshots/snap_pip_ago_2000.rds
+tests/testdata/snapshots/snap_pip_ago_all.rds
+tests/testdata/snapshots/snap_pip_ago_fg.rds
+tests/testdata/snapshots/snap_pip_ago_multi_pl.rds
+tests/testdata/snapshots/snap_pip_ago_popshare.rds
+tests/testdata/snapshots/snap_pip_all_2015.rds
+tests/testdata/snapshots/snap_pip_chn_2018.rds
+tests/testdata/snapshots/snap_pip_wld_pov.rds
+tests/testdata/snapshots/snapshot_manifest.txt

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: pipapi
 Title: API for the Poverty and Inequality Platform
-Version: 1.4.2.9000
+Version: 1.5.0
 Authors@R: 
     c(person(given = "Tony",
             family = "Fujs",

NEWS.md

@@ -1,4 +1,4 @@
-# pipapi (development version)
+# pipapi 1.5.0
 
 # pipapi 1.4.2
 * fix bugs

R/add_agg_stats.R

@@ -143,6 +143,8 @@ ag_average_poverty_stats <- function(df, return_cols) {
 }
 
 
+#' Replace a vector with NA_real_ if it contains any negatives or NAs
+#' @noRd
 negative_to_na <- function(x) {
   if (any(x < 0, na.rm = TRUE) || anyNA(x)) {
     NA_real_
@@ -151,6 +153,8 @@ negative_to_na <- function(x) {
   }
 }
 
+#' Replace a vector with NA_real_ if it contains any zeros
+#' @noRd
 zeros_to_na <- function(x) {
   if (any(x == 0, na.rm = TRUE)) {
     NA_real_