exponential_rate_one_way: Test the equality of rate parameters of exponential...

exponential_rate_one_wayR Documentation

Test the equality of rate parameters of exponential distributions.

Description

Test the equality of rate parameters of exponential distributions.

Usage

exponential_rate_one_way(x, fctr, conf.level = 0.95)

Arguments

x

a numeric vector of at least 50 data values per group.

fctr

a factor vector indicating groups.

conf.level

overall confidence level of the likelihood intervals. Uses Bonferroni correction.

Details

  • Null: All lambdas are equal. (lambda_1 = lambda_2 ... lambda_k).

  • Alternative: At least one lambda is not equal.

Value

An S3 class containing the test statistic, p value, list of likelihood based confidence intervals, overall confidence level, individual confidence level of each interval and alternative hypothesis.

Source

Examples

library(LRTesteR)

# Null is true
set.seed(1)
x <- rexp(150, 1)
fctr <- c(rep(1, 50), rep(2, 50), rep(3, 50))
fctr <- factor(fctr, levels = c("1", "2", "3"))
exponential_rate_one_way(x, fctr, .95)

# Null is false
set.seed(1)
x <- c(rexp(50, 1), rexp(50, 2), rexp(50, 3))
fctr <- c(rep(1, 50), rep(2, 50), rep(3, 50))
fctr <- factor(fctr, levels = c("1", "2", "3"))
exponential_rate_one_way(x, fctr, .95)

gmcmacran/MLTesteR documentation built on Sept. 12, 2024, 3:30 p.m.