WeightGermPercent: Weighted germination percentage

Description Usage Arguments Details Value References Examples

View source: R/WeightGermPercent.R

Description

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

Usage

1
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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
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 Feb. 17, 2021, 5:09 p.m.