germinationmetrics (version 0.1.4)

EmergenceRateIndex: Emergence Rate Index or Germination Rate Index

Description

Compute the Emergence rate index or Germination rate index according to

• shmueliEmergenceEarlyGrowth1971;textualgerminationmetrics and it's modification by de_santana_alise_2004;textualgerminationmetrics ranal_how_2006germinationmetrics;

• bilbroSoilCrustsCotton1982;textualgerminationmetrics; and

• fakoredeRelationSeedlingVigor1980;textualgerminationmetrics, fakoredeVariabilitySeedlingVigour1981;textualgerminationmetrics, and fakoredeHeteroticEffectsAssociation1983;textualgerminationmetrics.

Usage

EmergenceRateIndex(
  germ.counts,
  intervals,
  partial = TRUE,
  total.seeds = NULL,
  method = c("melville", "melvillesantanaranal", "bilbrowanjura", "fakorede")
)

Arguments

germ.counts

Germination counts at each time interval. Can be partial or cumulative as specified in the argument partial.

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.

total.seeds

Total number of seeds.

method

The method to be used. Either "melville", "melvillesantanaranal", "bilbrowanjura" or "fakorede". Default is "melville" (see Details).

Value

The value of the Emergence rate index.

Details

Several germination indices are referred to as Emergence rate Index (ERI).

shmueliEmergenceEarlyGrowth1971;textualgerminationmetrics

It is estimated as follows.

ERI = _i=i_0^k-1N_i(k-i)

Where, N_i is the number of seeds germinated in the ith time interval (not the accumulated number, but the number corresponding to the ith interval), i_0 is the time interval when emergence/germination started, and k is the total number of time intervals.

A modification for the same was suggested by de_santana_alise_2004;textualgerminationmetrics ranal_how_2006germinationmetrics and is estimated by dividing Emergence rate index (ERI) by total number of emerged seedlings (or germinated seeds) as follows.

ERI_mod = _i=i_0^k-1N_i(k-i)N_g = ERIN_g

Where, N_g is the total number of germinated seeds at the end of the test, N_i is the number of seeds germinated in the ith time interval (not the accumulated number, but the number corresponding to the ith interval), i_0 is the time interval when emergence/germination started, and k is the total number of time intervals.

bilbroSoilCrustsCotton1982;textualgerminationmetrics

It is the estimated as follows.

ERI = _i=1^kN_iT = N_gT

Where, N_g is the total number of germinated seeds at the end of the test, N_i is the number of seeds germinated in the ith time interval (not the accumulated number, but the number corresponding to the ith interval), and T is the mean germination time or mean emergence time.

fakoredeRelationSeedlingVigor1980,fakoredeVariabilitySeedlingVigour1981,fakoredeHeteroticEffectsAssociation1983;textualgerminationmetrics

It is estimated as follows.

ERI = TFGP/100

Where, T is the Mean germination time and FGP is the final germination time.

Others

Apart from the above the above, the name Emergence rate index (ERI) has also been used to for the mathematical expressions for Speed of germination (GermSpeed) allan_seedling_1962,erbachTillageContinuousCorn1982germinationmetrics, Timson's index (TimsonsIndex) chaudharyEffectTemperatureAssociated1970germinationmetrics, and George's index (GermRateGeorge) chopraEffectSoilTemperature1980germinationmetrics.

References

See Also

GermSpeed, TimsonsIndex, GermRateGeorge

Examples

# NOT RUN {
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
#----------------------------------------------------------------------------
EmergenceRateIndex(germ.counts = x, intervals = int)
EmergenceRateIndex(germ.counts = x, intervals = int,
                   method = "melville")
EmergenceRateIndex(germ.counts = x, intervals = int,
                   method = "melvillesantanaranal")
EmergenceRateIndex(germ.counts = x, intervals = int,
                   method = "bilbrowanjura")
EmergenceRateIndex(germ.counts = x, intervals = int,
                   total.seeds = 50, method = "fakorede")

# From cumulative germination counts
#----------------------------------------------------------------------------
EmergenceRateIndex(germ.counts = y, intervals = int, partial = FALSE,)
EmergenceRateIndex(germ.counts = y, intervals = int, partial = FALSE,
                   method = "melville")
EmergenceRateIndex(germ.counts = y, intervals = int, partial = FALSE,
                   method = "melvillesantanaranal")
EmergenceRateIndex(germ.counts = y, intervals = int, partial = FALSE,
                   method = "bilbrowanjura")
EmergenceRateIndex(germ.counts = y, intervals = int, partial = FALSE,
                   total.seeds = 50, method = "fakorede")

# }