Mercurial > repos > greg > insect_phenology_model

comparison insect_phenology_model.R @ 29:4d38c1789ae0 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author greg
date Thu, 09 Nov 2017 11:45:37 -0500
parents 3ef94dce7454
children 9146801c5ba1
comparison
equal deleted inserted replaced
28:3ef94dce7454 29:4d38c1789ae0
203 temperature_file_path <- convert_csv_to_rdata(opt$location, temperature_data) 203 temperature_file_path <- convert_csv_to_rdata(opt$location, temperature_data)
204 latitude <- temperature_data[1, 1] 204 latitude <- temperature_data[1, 1]
205 205
206 cat("Number of days: ", opt$num_days, "\n") 206 cat("Number of days: ", opt$num_days, "\n")
207 cat("Latitude: ", latitude, "\n") 207 cat("Latitude: ", latitude, "\n")
208 cat("Replications: ", opt$replications) 208 cat("Replications: ", opt$replications, "\n")
209 209
210 # Initialize matrix for results from all replications. 210 # Initialize matrix for results from all replications.
211 S0.rep <- S1.rep <- S2.rep <- S3.rep <- S4.rep <- S5.rep <- matrix(rep(0, opt$num_days * opt$replications), ncol = opt$replications) 211 S0.rep <- S1.rep <- S2.rep <- S3.rep <- S4.rep <- S5.rep <- matrix(rep(0, opt$num_days * opt$replications), ncol = opt$replications)
212 newborn.rep <- death.rep <- adult.rep <- pop.rep <- g0.rep <- g1.rep <- g2.rep <- g0a.rep <- g1a.rep <- g2a.rep <- matrix(rep(0, opt$num_days * opt$replications), ncol=opt$replications) 212 newborn.rep <- death.rep <- adult.rep <- pop.rep <- g0.rep <- g1.rep <- g2.rep <- g0a.rep <- g1a.rep <- g2a.rep <- matrix(rep(0, opt$num_days * opt$replications), ncol=opt$replications)
213 213