Mercurial > repos > greg > insect_phenology_model
comparison insect_phenology_model.R @ 36:5097cfeedc4f draft
Uploaded
author | greg |
---|---|
date | Tue, 20 Mar 2018 10:09:00 -0400 |
parents | 29ec818b1c29 |
children | c0f76f4f84fc |
comparison
equal
deleted
inserted
replaced
35:29ec818b1c29 | 36:5097cfeedc4f |
---|---|
366 title_str = paste(":", life_stages_adult, "Adult Pop by Gen", ":", sep=" "); | 366 title_str = paste(":", life_stages_adult, "Adult Pop by Gen", ":", sep=" "); |
367 } | 367 } |
368 title = paste(insect, ": Reps", replications, title_str, location, ": Lat", latitude, ":", start_date, "-", end_date, sep=" "); | 368 title = paste(insect, ": Reps", replications, title_str, location, ": Lat", latitude, ":", start_date, "-", end_date, sep=" "); |
369 legend_text = c("P", "F1", "F2"); | 369 legend_text = c("P", "F1", "F2"); |
370 columns = c(1, 2, 4); | 370 columns = c(1, 2, 4); |
371 plot(days, group, main=title, type="l", ylim=c(0, maxval), axes=FALSE, lwd=2, xlab="", ylab=""); | 371 plot(days, group, main=title, type="l", ylim=c(0, maxval), axes=FALSE, lwd=2, xlab="", ylab="", cex=3, cex.lab=3, cex.axis=3, cex.main=3); |
372 legend("topleft", legend_text, lty=c(1, 1, 1), col=columns, cex=3); | 372 legend("topleft", legend_text, lty=c(1, 1, 1), col=columns, cex=3); |
373 lines(days, group2, lwd=2, lty=1, col=2); | 373 lines(days, group2, lwd=2, lty=1, col=2); |
374 lines(days, group3, lwd=2, lty=1, col=4); | 374 lines(days, group3, lwd=2, lty=1, col=4); |
375 axis(side=1, at=ticks, labels=date_labels, font.axis=3, xpd=TRUE, cex=3, cex.lab=3, cex.axis=3, cex.main=3); | 375 axis(side=1, at=ticks, labels=date_labels, font.axis=3, xpd=TRUE, cex=3, cex.lab=3, cex.axis=3, cex.main=3); |
376 axis(side=2, font.axis=3, xpd=TRUE, cex=3, cex.lab=3, cex.axis=3, cex.main=3); | 376 axis(side=2, font.axis=3, xpd=TRUE, cex=3, cex.lab=3, cex.axis=3, cex.main=3); |