d.ends: Extreme (both high and low) values are desirable

Description

Maps a numeric variable to a 0-1 scale such that values at the ends of the distribution are desirable.

Usage

d.ends(x, cut1, cut2, cut3, cut4, des.min = 0, des.max = 1, scale = 1)

Arguments

Vector of numeric or integer values.

cut1, cut2, cut3, cut4

Values of the original data that define where the desirability function changes.

des.min, des.max

Minimum and maximum desirability values. Defaults to zero and one, respectively.

scale

Controls how steeply the function increases or decreases.

Value

Numeric vector of desirability values.

Details

Values less than cut1 and greater than cut4 will have a high desirability. Values between cut2 and cut3 will have a low desirability. Values between cut1 and cut2 and between cut3 and cut4 will have intermediate values. This function is useful when the data represent differences between groups; for example, log2 fold-changes in gene expression. In this case, both high an low values are of interest.

Examples

Run this code

# NOT RUN {
set.seed(1)
x <- rnorm(1000, mean=100, sd =5) # generate data
d <- d.ends(x, cut1=90, cut2=95, cut3=105, cut4=110, scale=1)

# plot data
hist(x, breaks=30)
# add line
des.line(x, "d.ends", des.args=c(cut1=90, cut2=95, cut3=105,
cut4=110, scale=1))

hist(x, breaks=30)
des.line(x, "d.ends", des.args=c(cut1=90, cut2=95, cut3=105,
cut4=110, des.min=0.1, des.max=0.95, scale=1.5))
# }