plot.FollowUpChart: plot.FollowUpChart

In n8thangreen/HESmanip: Hospital length of stay data preprocessing and analysis

Usage

plot.FollowUpChart(id, start, stop, col = 1, lty = 1, lwd = 2, xlim, xlab = "", ylab = "", ...)

Arguments

id
start
stop
col
lty
lwd
xlim
xlab
ylab
...

See Also

plot.FollowUpChartBatch

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (id, start, stop, col = 1, lty = 1, lwd = 2, xlim, xlab = "", 
    ylab = "", ...) 
{
    if (missing(xlim)) 
        xlim <- c(min(start), max(stop))
    N <- length(start)
    plot(0, 0, type = "n", ylim = c(1, N/2), xlim = xlim, xlab = "", 
        ylab = "", ...)
    nix <- lapply(1:N, function(i) {
        segments(0, id[i], start[i], id[i], col = "lightgray", 
            lty = lty, lwd = lwd)
        segments(start[i], id[i], stop[i], id[i], col = col, 
            lty = lty, lwd = lwd)
    })
  }

n8thangreen/HESmanip documentation built on March 21, 2020, 12:20 a.m.