Calendar time cut of survival data

For a given time interval, each spell is cut so that it fully lies in the given time interval

cal.window(dat, window, surv = c("enter", "exit", "event", "birthdate"))

Arguments

dat	Input data frame. Must contain survival data and a birth date.
window	Vector of length two; the time interval
surv	Vector of length four giving the names of the central variables in 'dat'.

Value

A data frame of the same form as the input data frame, but 'cut' as desired. Intervals exceeding window[2] will be given event = 0

Details

The window must be in the order (begin, end)

See also

age.window, coxreg, aftreg

Author

Göran Broström

Examples

dat <- data.frame(enter = 0, exit = 5.731, event = 1,
birthdate = 1962.505, x = 2)
window <- c(1963, 1965)
dat.trim <- cal.window(dat, window)