Repository 'insect_phenology_model'
hg clone https://eddie.galaxyproject.org/repos/greg/insect_phenology_model

Changeset 36:c2025ecec509 (2017-11-09)
Previous changeset 35:21e8dc696db3 (2017-11-09) Next changeset 37:b0126627ade6 (2017-11-09)
Commit message:
Uploaded
modified:
insect_phenology_model.R
b
diff -r 21e8dc696db3 -r c2025ecec509 insect_phenology_model.R
--- a/insect_phenology_model.R Thu Nov 09 13:41:04 2017 -0500
+++ b/insect_phenology_model.R Thu Nov 09 13:43:08 2017 -0500
[
@@ -201,7 +201,7 @@
 # Read in the input temperature datafile into a Data Frame object.
 temperature_data <- read.csv(file=opt$input, header=T, sep=",")
 start_date <- temperature_data[c(1:1), 3]
-end_date <- temperature_data[c(1:opt$num_days), 3]
+end_date <- temperature_data[c(opt$num_days:1), 3]
 raw_data_matrix <- matrix(rep(0, opt$num_days * 6), nrow=opt$num_days)
 temperature_file_path <- convert_csv_to_rdata(temperature_data, raw_data_matrix)
 latitude <- temperature_data[1, 1]