changeset 59:1d4e864b7720 draft

Uploaded
author greg
date Mon, 13 Nov 2017 12:14:26 -0500
parents f64704e0ad97
children a3bdf0d35d1d
files insect_phenology_model.R
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/insect_phenology_model.R	Mon Nov 13 12:14:19 2017 -0500
+++ b/insect_phenology_model.R	Mon Nov 13 12:14:26 2017 -0500
@@ -197,8 +197,8 @@
 # The input data currently must have 6 columns:
 # LATITUDE, LONGITUDE, DATE, DOY, TMIN, TMAX
 temperature_data <- read.csv(file=opt$input, header=T, strip.white=TRUE, sep=",")
-start_date <- temperature_data[c(1:1), 3]
-end_date <- temperature_data[c(opt$num_days:opt$num_days), 3]
+start_date <- temperature_data[1, 3]
+end_date <- temperature_data[opt$num_days, 3]
 latitude <- temperature_data[1, 1]
 daylight_length_vector <- get_daylight_length(latitude, temperature_data, opt$num_days)