temporary changes to buildModel.R to debug VA 2020 disagg error

USEPA · Apr 1, 2023 · 45383f4 · 45383f4
1 parent f42c216
commit 45383f4
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/R/BuildModel.R b/R/BuildModel.R
@@ -693,7 +693,14 @@ assembleTwoRegionIO <- function(year, iolevel, disagg_specs=NULL) {
 
   # Assemble two-region IO tables 
   TwoRegionIO <- list()
-  for (state in sort(c(state.name, "District of Columbia"))) {
+  #TEMPORARY FOR DEBUGGING
+  for (state in c("Virginia")){
+#  for (state in sort(c(state.name, "District of Columbia"))) {
+
+    if(state == "Virginia"){
+      temp <-1
+    }
+
     ## Two-region Make
     model$MakeTransactions <- State_Make_ls[[state]]
     model$FullUse <- State_Use_ls[[state]]