CUGerm | R Documentation |
Compute the Coefficient of uniformity of germination (CUG).
CUGerm(germ.counts, intervals, partial = TRUE)
germ.counts |
Germination counts at each time interval. Can be partial
or cumulative as specified in the argument |
intervals |
The time intervals. |
partial |
logical. If |
CUG is computed as follows \insertCiteheydecker_seed_1972,bewley_seeds_1994germinationmetrics. \loadmathjax
\mjsdeqnCUG = \frac\sum_i=1^kN_i\sum_i=1^k(\overlineT-T_i)^2N_i
Where, \mjseqn\overlineT is the the mean germination time, \mjseqnT_i is the time from the start of the experiment to the \mjseqnith interval, \mjseqnN_i is the number of seeds germinated in the \mjseqnith time interval (not the accumulated number, but the number corresponding to the \mjseqnith interval), and \mjseqnk is the total number of time intervals.
The value of the coefficient of uniformity of germination as \mjseqn\mathrmtime^-2.
GermSynchrony
,
MeanGermTime
x <- c(0, 0, 0, 0, 4, 17, 10, 7, 1, 0, 1, 0, 0, 0)
y <- c(0, 0, 0, 0, 4, 21, 31, 38, 39, 39, 40, 40, 40, 40)
int <- 1:length(x)
# From partial germination counts
#----------------------------------------------------------------------------
CUGerm(germ.counts = x, intervals = int)
# From cumulative germination counts
#----------------------------------------------------------------------------
CUGerm(germ.counts = y, intervals = int, partial = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.