GermPercent: Germination percentage

Description

Compute the following metrics:

GermPercent: Germination percentage or Final germination percentage or Germinability ista_chapter_2015germinationmetrics.
PeakGermPercent: Peak germination percentage vallance_studies_1950,roh_maturity_2004germinationmetrics.

Usage

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

Value

The germination percentage (%) value.

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 ista_chapter_2015germinationmetrics.

GP = N_gN_t 100

Where, N_g is the number of germinated seeds and N_t is the total number of seeds.

The value of N_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 vallance_studies_1950,roh_maturity_2004germinationmetrics.

PGP = N_maxN_t 100

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

References

Examples

Run this code

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)

Run the code above in your browser using DataLab