View source: R/emergence_plot.R
| plot.emergence | R Documentation |
Draws the cumulative development curve of the survey (stage shares accumulated from the most developed stage downwards) against the projected eclosion dates, marks the quantile crossings (16 projection exists, arrows from each eclosion date to the corresponding hatch date. The quantile dates are listed in a legend box on the right-hand side of the figure (one row per quantile, with a true arrow glyph instead of the character combination "->").
## S3 method for class 'emergence'
plot(
x,
show_hatch = TRUE,
title = NULL,
sub = NULL,
family = "serif",
cex = 2,
lwd = 2,
legend_right = TRUE,
xlab = "Projected eclosion date",
ylab = "Cumulative development (%)",
...
)
x |
A |
show_hatch |
Logical (default TRUE); whether to draw the hatch arrows when a hatch projection exists. |
title |
Plot title; |
sub |
Plot footnote; |
family |
Text font family. Default |
cex |
Overall text-size multiplier. Default |
lwd |
Overall line-width multiplier. Default |
legend_right |
Logical (default TRUE); whether the quantile
legend is placed outside the panel on the right-hand side
( |
xlab, ylab |
Axis labels. |
... |
Further graphical parameters passed to |
f <- system.file("extdata", "emergence_example.csv",
package = "insectecol")
fit <- emergence_calc(emergence_read(f), survey_date = "2026-03-20",
pre_ovip = 3, egg_days = 10)
plot(fit)
## the projection is fully customisable (title, axis labels, font
## family); Chinese labels are rendered through the device's font
## fallback (SimSun on Chinese 'Windows'):
plot(fit, title = "Stage-grading projection",
xlab = "Projected eclosion date",
ylab = "Cumulative development (%)")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.