Automate production of package internal data

Verified identical with old internal data.
JGCRI · Sep 21, 2017 · f4e20a2 · f4e20a2
1 parent e970aec
commit f4e20a2
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/data-raw/sysdata.R b/data-raw/sysdata.R
@@ -0,0 +1,14 @@
+## Generate the internal data for the package
+## This must be sourced as a script because of the way devtools::use_data works.
+## Source it from the top level of a development copy of the package.
+
+
+source('data-raw/gdpdef.R')
+gdpdef <- calc.gdpdef('data-raw/GDPDEF.csv')
+
+source('data-raw/energyconv.R')
+energyconv <- prep.energyconv()
+
+devtools::use_data(gdpdef, energyconv, internal=TRUE, overwrite=TRUE,
+                   compress='xz')
+