runningratio {broman}

Running ratio

Description

Calculates a running ratio; a ratio sum(top)/sum(bottom) in a sliding window.

Usage

runningratio(pos, numerator, denominator, at = NULL, window = 1000)

Arguments

pos

Positions for the values.

numerator

Values for numerator in ratio.

denominator

Values for denominator in ratio.

at

Positions at which running ratio is calculated. If NULL, pos is used.

window

Window width.

Value

A vector with the same length as the input at (or pos, if at is NULL), containing the running ratio.

Author(s)

Karl W Broman [e-mail]

See Also

runningmean()

Examples

x <- 1:1000
y <- runif(1000, 1, 5)
z <- runif(1000, 1, 5)
plot(x, runningratio(x, y, z, window=5), type="l", lwd=2)
lines(x, runningratio(x, y, z, window=50), lwd=2, col="blue")
lines(x, runningratio(x, y, z, window=100), lwd=2, col="red")