From 41bd54183f7d43bb152a8de70c1350e7aa8c475e Mon Sep 17 00:00:00 2001
From: Ben Young <Ben.Young@erg.com>
Date: Wed, 15 May 2024 21:48:25 -0400
Subject: [PATCH] include writing model to excel in some tests

---
 .gitignore               | 1 +
 tests/test_model_build.R | 2 ++
 2 files changed, 3 insertions(+)

diff --git a/.gitignore b/.gitignore
index 31700f3b..b8d27eda 100644
--- a/.gitignore
+++ b/.gitignore
@@ -7,3 +7,4 @@ work
 inst/doc/**/*.html
 renv/
 examples
+tests/*.xlsx
diff --git a/tests/test_model_build.R b/tests/test_model_build.R
index 962c725f..10e7cb38 100644
--- a/tests/test_model_build.R
+++ b/tests/test_model_build.R
@@ -64,6 +64,7 @@ m <- "USEEIOv2.0-GHG"
 cfg <- paste0("modelspecs/", m, ".yml")
 model <- buildModel(m, configpaths = file.path(cfg))
 printValidationResults(model)
+writeModeltoXLSX(model, ".")
 
 ## USEEIOv2.0 Detail, industry model
 model <- useeior:::initializeModel(m, configpaths = file.path(cfg))
@@ -132,6 +133,7 @@ m <- "GAEEIOv1.0-s-GHG-19"
 cfg <- paste0("modelspecs/", m, ".yml")
 model <- buildModel(m, configpaths = file.path(cfg))
 printValidationResults(model)
+writeModeltoXLSX(model, ".")
 
 ## StateEEIOv1.0 Two-region Summary model with Import Factors
 cfg <- c(paste0("modelspecs/", m, ".yml"),