From 5c12c14f8dd16dbf8f1e80d94be65e600a6911ae Mon Sep 17 00:00:00 2001
From: syounkin <syounkin@wisc.edu>
Date: Thu, 21 Nov 2024 15:13:37 -0600
Subject: [PATCH] Bug fix in WI-schools-cycle.Rmd
---
WI-schools-cycle.Rmd | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/WI-schools-cycle.Rmd b/WI-schools-cycle.Rmd
index 5e75b19..bd8f410 100644
--- a/WI-schools-cycle.Rmd
+++ b/WI-schools-cycle.Rmd
@@ -67,7 +67,7 @@ gridList <- list()
routesList <- list()
indexVec <- 1:nrow(WI_schools)
-#indexVec <- 1:50
+
jj <- 1;
bad.school.vec <- c()
@@ -131,7 +131,9 @@ for(j in indexVec){
}
-WI_schools <- WI_schools[-bad.school.vec,]
+if(length(bad.school.vec) > 0){
+ WI_schools <- WI_schools[-bad.school.vec,]
+}
saveRDS(WI_schools, "./R/data/WI_schools.rds")
saveRDS(gridList, "./R/data/gridList.rds")