Skip to contents

Searches (n, c) as AcceptanceSampling::find.plan: from c = 0, n = 1, raise n while P_A(RQL) > beta, else raise c while P_A(AQL) < 1 - alpha (Hedderich, Sachs & Reynarowych 2023, eq 7.17).

Usage

accpln(aql, rql, alpha = 0.05, beta_risk = 0.1, max_n = 1e+05)

Arguments

aql, rql

Quality levels, 0 < aql < rql < 1.

alpha, beta_risk

Producer's and consumer's risks.

max_n

Search limit.

Value

Named list: n, c, p_accept_aql, p_accept_rql.

References

Kiermeier, A. (2008). Journal of Statistical Software 26(6).

Examples

accpln(0.01, 0.06)
#> $n
#> [1] 110
#> 
#> $c
#> [1] 3
#> 
#> $p_accept_aql
#> [1] 0.9749619
#> 
#> $p_accept_rql
#> [1] 0.09803038
#>