# \dontshow{
Blackmore <- transform(Blackmore, timepoint = as.Date("2000-01-01") + round(age * 365.25),
result = cut(exercise, breaks = seq(0, 30, 2), labels = paste0("<=", seq(0, 30, 2)[-1]),
include.lowest = TRUE, ordered_result = TRUE))
# }
## Continuing example from `add_transitions()`
# subject, timepoint and result arguments all defaults and required types
Blackmore |> str()
# Integer vector of the previous test dates
get_prev_date(Blackmore)
# Add column of previous test dates to data frame
add_prev_date(Blackmore) |> head(32)
rm(Blackmore)
Run the code above in your browser using DataLab