keeponly: Eliminate Consecutive Extreme Values

In JVAdams/LW1949: An Automated Approach to Evaluating Dose-Effect Experiments Following Litchfield and Wilcoxon (1949)

Description

Generate the index for eliminating values beyond a given maximum number of consecutive extremes allowed.

Usage

keeponly(x, extremes = c(0, 100), nconsec = 2)

Arguments

x	A numeric vector, with no missing values.
extremes	A numeric vector of length two giving the boundary limits for x, default c(0, 100).
nconsec	An integer scalar, the maximum number of consecutive extreme values allowed, default 2.

Value

A logical vector for selecting all elements of x without exceeding nconsec consecutive extreme values.

Examples

vec <- c(0, 0, 0, 4, 4, 4, 100, 100, 100, 100)
vec[keeponly(vec)]
# the original vector need not be ordered
vec <- c(100, 4, 100, 4, 0, 100, 0, 4, 0, 100)
keeponly(vec)

JVAdams/LW1949 documentation built on May 7, 2019, 10:14 a.m.