Mean germination percentage and number of seeds per time interval
Compute the following metrics:
MeanGermPercentMean/average germination percentage per unit time (\(\overline{GP}\)) (Czabator 1962).
MeanGermNumberNumber of seeds germinated per unit time (\(\overline{N}\)) (Khamassi et al. 2013).
MeanGermPercent( germinated.seeds, germ.counts, total.seeds, intervals, partial = TRUE ) MeanGermNumber(germ.counts, intervals, partial = TRUE)
germinated.seeds |
Number of germinated seeds |
germ.counts |
Germination counts at each time interval. Can be partial
or cumulative as specified in the argument |
total.seeds |
Total number of seeds. |
intervals |
The time intervals. |
partial |
logical. If |
Mean germination percentage per unit time (\(\overline{GP}\)) is computed as follows (Czabator 1962).
Where, \(GP\) is the final germination percentage, \(T_{k}\) is the time at the \(k\)th time interval, and \(k\) is the total number of time intervals required for final germination.
Mean number of seeds germinated per unit time (\(\overline{N}\)) is computed as follows (Khamassi et al. 2013).
Where, \(N_{g}\) is the number of germinated seeds at the end of the germination test, \(T_{k}\) is the time at the \(k\)th time interval, and \(k\) is the total number of time intervals required for final germination.
The value of mean germination percentage or mean number of seeds per time interval.
Czabator FJ (1962).
“Germination value: An index combining speed and completeness of pine seed germination.”
Forest Science, 8(4), 386–396.
Khamassi K, Harbaoui K, Jaime ATdS, Jeddi FB (2013).
“Optimal germination temperature assessed by indices and models in field bean (Vicia faba L. var. minor).”
Agriculturae Conspectus Scientificus, 78(2), 131–136.
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 #---------------------------------------------------------------------------- MeanGermPercent(germ.counts = x, total.seeds = 50, intervals = int) MeanGermNumber(germ.counts = x, intervals = int) # From cumulative germination counts #---------------------------------------------------------------------------- MeanGermPercent(germ.counts = y, total.seeds = 50, intervals = int, partial = FALSE) MeanGermNumber(germ.counts = y, intervals = int, partial = FALSE) # From number of germinated seeds #---------------------------------------------------------------------------- MeanGermPercent(germinated.seeds = 40, total.seeds = 50, intervals = int)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.