changeset 91:b6b42e12e173 draft

Uploaded
author greg
date Fri, 01 Dec 2017 09:28:01 -0500
parents 7433448e313d
children fdc148a9695a
files insect_phenology_model.R
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/insect_phenology_model.R	Fri Dec 01 09:20:56 2017 -0500
+++ b/insect_phenology_model.R	Fri Dec 01 09:28:01 2017 -0500
@@ -454,7 +454,7 @@
         num_insects.newborn <- length(birth.vec[,1])
         vec.mat <- rbind(vec.mat, birth.vec)
         # Update population size for the next day.
-        n <- n - num_insects.death + num_insects.newborn 
+        num_insects <- num_insects - num_insects.death + num_insects.newborn 
 
         # Aggregate results by day.
         tot.pop <- c(tot.pop, n)