# WeightGermPercent: Weighted germination percentage In germinationmetrics: Seed Germination Indices and Curve Fitting

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

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