# HG changeset patch
# User greg
# Date 1510683816 18000
# Node ID 3c5a149d4255c56763f03aee6a0405204f1cd3e7
# Parent  f3d11014be12d988767af19bcf43a5442c03519a
Uploaded

diff -r f3d11014be12 -r 3c5a149d4255 insect_phenology_model.R
--- a/insect_phenology_model.R	Tue Nov 14 13:20:15 2017 -0500
+++ b/insect_phenology_model.R	Tue Nov 14 13:23:36 2017 -0500
@@ -42,7 +42,7 @@
         daylight_length_vector[i] <- 24 - (24 / pi * acos((sin(p * pi / 180) + sin(latitude * pi / 180) * sin(phi)) / (cos(latitude * pi / 180) * cos(phi))))
     }
     # Append daylight_length_vector as a new column to temperature_data_matrix.
-    cbind(temperature_data_matrix, daylight_length_vector)
+    temperature_data_matrix[, 7] <- daylight_length_vector
     # Return the altered temperature_data_matrix.
     temperature_data_matrix
 }