include writing to JSON in tests

USEPA · Nov 11, 2024 · 03df863 · 03df863
1 parent 22f3196
commit 03df863
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/tests/test_model_build.R b/tests/test_model_build.R
@@ -129,6 +129,7 @@ writeModeltoXLSX(model, ".")
 ## USEEIOv2.3 Summary, commodity model with GHGs and Import Factors
 m <- "USEEIOv2.3-s-GHG-19"
 model <- buildModel(m)
+writeModeltoJSON(model, ".")
 printValidationResults(model)
 testCalculationFunctions(model)
 testVisualizationFunctions(model)
@@ -137,6 +138,7 @@ testVisualizationFunctions(model)
 m <- "GAEEIOv1.0-GHG-19"
 model <- buildModel(m)
 printValidationResults(model)
+writeModeltoJSON(model, ".")
 writeModeltoXLSX(model, ".")
 testCalculationFunctions(model)
 testVisualizationFunctions(model)