R/error.bars.R

Defines functions error.bars

error.bars <-
function(x, up, lo, width = 0.02, ...)
{
	xlim <- range(x)
	ci <- diff(xlim) * width
	segments(x, up, x, lo, ...)
	segments(x - ci, up, x + ci, up, ...)
	segments(x - ci, lo, x + ci, lo, ...)
	range(up, lo)
}

Try the mpath package in your browser

Any scripts or data that you put into this service are public.

mpath documentation built on Jan. 7, 2023, 1:17 a.m.