comparison insect_phenology_model.R @ 93:06acadd38824 draft

Uploaded
author greg
date Fri, 01 Dec 2017 09:43:56 -0500
parents fdc148a9695a
children 89492de287a6
comparison
equal deleted inserted replaced
92:fdc148a9695a 93:06acadd38824
566 566
567 par(mar=c(5, 6, 4, 4), mfrow=c(3, 1)) 567 par(mar=c(5, 6, 4, 4), mfrow=c(3, 1))
568 568
569 # Data analysis and visualization plots 569 # Data analysis and visualization plots
570 # only within a single calendar year. 570 # only within a single calendar year.
571 day.all <- c(1:num_days) 571 day.all <- c(1:opt$num_days)
572 start_date <- temperature_data_frame$DATE[1] 572 start_date <- temperature_data_frame$DATE[1]
573 end_date <- temperature_data_frame$DATE[opt$num_days] 573 end_date <- temperature_data_frame$DATE[opt$num_days]
574 574
575 # Subfigure 1: population size by life stage 575 # Subfigure 1: population size by life stage
576 title <- paste(opt$insect, ": Total pop. by life stage :", opt$location, ": Lat:", latitude, ":", start_date, "-", end_date, sep=" ") 576 title <- paste(opt$insect, ": Total pop. by life stage :", opt$location, ": Lat:", latitude, ":", start_date, "-", end_date, sep=" ")