GermPercent: Germination percentage

In germinationmetrics: Seed Germination Indices and Curve Fitting

Germination percentage

Description

Compute the following metrics:

GermPercent

Germination percentage or Final germination percentage or Germinability \insertCiteista_chapter_2015germinationmetrics.

PeakGermPercent

Peak germination percentage \insertCitevallance_studies_1950,roh_maturity_2004germinationmetrics.

Usage

GermPercent(germinated.seeds, germ.counts, total.seeds, partial = TRUE)

PeakGermPercent(germ.counts, intervals, total.seeds, partial = TRUE)

Arguments

germinated.seeds	Number of germinated seeds
germ.counts	Germination counts at each time interval. Can be partial or cumulative as specified in the argument partial.
total.seeds	Total number of seeds.
partial	logical. If TRUE, germ.counts is considered as partial and if FALSE, it is considered as cumulative. Default is TRUE.
intervals	The time intervals.

Details

Germination percentage is computed as follows \insertCiteista_chapter_2015germinationmetrics. \loadmathjax

\mjsdeqn

GP = \fracN_gN_t \times 100

Where, \mjseqnN_g is the number of germinated seeds and \mjseqnN_t is the total number of seeds.

The value of \mjseqnN_g can be either specified using the argument germinated.seeds or is computed from the germ.counts argument.

Peak germination percentage is computed as follows \insertCitevallance_studies_1950,roh_maturity_2004germinationmetrics.

\mjsdeqn

PGP = \fracN_maxN_t \times 100

Where, \mjseqnN_max is the maximum number of seeds germinated per interval.

Value

The germination percentage (%) value.

References

\insertAllCited

Examples

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)
z <- c(0, 0, 0, 0, 11, 11, 9, 7, 1, 0, 1, 0, 0, 0)
int <- 1:length(x)

# From partial germination counts
#----------------------------------------------------------------------------
GermPercent(germ.counts = x, total.seeds = 50)
PeakGermPercent(germ.counts = x, intervals = int, total.seeds = 50)
# For multiple peak germination times
PeakGermPercent(germ.counts = z, intervals = int, total.seeds = 50)

# From cumulative germination counts
#----------------------------------------------------------------------------
GermPercent(germ.counts = y, total.seeds = 50, partial = FALSE)
PeakGermPercent(germ.counts = y, intervals = int, total.seeds = 50,
                partial = FALSE)
# For multiple peak germination times
PeakGermPercent(germ.counts = cumsum(z), intervals = int, total.seeds = 50,
                partial = FALSE)

# From number of germinated seeds
#----------------------------------------------------------------------------
GermPercent(germinated.seeds = 40, total.seeds = 50)

germinationmetrics documentation built on Aug. 19, 2023, 1:07 a.m.