R/MeanGermPercent.R
MeanGermPercent.Rd
Compute the following metrics:
MeanGermPercent
Mean/average germination percentage per unit time (\(\overline{GP}\)) (Czabator 1962) .
MeanGermNumber
Number 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)
Number of germinated seeds
Germination counts at each time interval. Can be partial
or cumulative as specified in the argument partial
.
Total number of seeds.
The time intervals.
logical. If TRUE
, germ.counts
is considered as
partial and if FALSE
, it is considered as cumulative. Default is
TRUE
.
The value of mean germination percentage as %
\(\mathrm{time^{-1}}\) or mean number of seeds per time interval as
\(\mathrm{count \, time^{-1}}\).
Mean germination percentage per unit time (\(\overline{GP}\)) is computed as follows (Czabator 1962) .
\[\overline{GP} = \frac{GP}{T_{k}}\]
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) .
\[\overline{N} = \frac{N_{g}}{T_{k}}\]
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.
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)
#> [1] 5.714286
MeanGermNumber(germ.counts = x, intervals = int)
#> [1] 2.857143
# From cumulative germination counts
#----------------------------------------------------------------------------
MeanGermPercent(germ.counts = y, total.seeds = 50, intervals = int, partial = FALSE)
#> [1] 5.714286
MeanGermNumber(germ.counts = y, intervals = int, partial = FALSE)
#> [1] 2.857143
# From number of germinated seeds
#----------------------------------------------------------------------------
MeanGermPercent(germinated.seeds = 40, total.seeds = 50, intervals = int)
#> [1] 5.714286