WeightGermPercent: Weighted germination percentage

In germinationmetrics: Seed Germination Indices and Curve Fitting

Weighted germination percentage

Description

Compute the Weighted germination percentage \mjseqnWGP or Weighted germination index \mjseqnWGI \insertCitereddy_effect_1978,reddy_effect_1985germinationmetrics. \loadmathjax

Usage

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

Arguments

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 tested.
intervals	The time intervals.
partial	logical. If TRUE, germ.counts is considered as partial and if FALSE, it is considered as cumulative. Default is TRUE.

Details

Weighted germination percentage was calculated by giving maximum weight to the seeds that germinate first and decreasing weight to the seeds that germinate subsequently. It is computed as follows \insertCitereddy_effect_1978,reddy_effect_1985germinationmetrics.

\mjsdeqn

WGP = \frac\sum_i=1^k(k-i+1)N_ik \times N \times 100

Where, \mjseqnN_i is the number of seeds that germinated in the time interval \mjseqni (not cumulative, but partial count), \mjseqnN is the total number of seeds tested, and \mjseqnk is the total number of time intervals.

Value

The weighted 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)
int <- 1:length(x)

# From partial germination counts
#----------------------------------------------------------------------------
WeightGermPercent(germ.counts = x, total.seeds = 50, intervals = int)

# From cumulative germination counts
#----------------------------------------------------------------------------
WeightGermPercent(germ.counts = y, total.seeds = 50, intervals = int,
                  partial = FALSE)

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