pgx.exposure: Derive variables about treatment exposure from longitudinal...
In tobyjohnson/gtx: Genetics ToolboX

Description Usage Arguments Details Value Author(s) Examples

Function to derive varianles about treatment exposure, from longitudinal data typical of a clinical trial.

1
2
3

pgx.exposure(d, exposure,
             estart = "exstdtR", eend = "exendtR",
             subjid = "USUBJID")

`d`	A data frame containing subject identifiers
`exposure`	A data frame containing therapy exposure records
`estart`	Name of the variable in `exposure` that describes exposure start time
`eend`	Name of the variable in `exposure` that describes exposure end time
`subjid`	Name of the variable in `d` and `exposure`, that identifies individual subjects

This function derives total time on treatment, using mincover.

TO DO: Calculate first and last days, elapsed time, cumulative dose

A data frame of derived variables.

Toby Johnson Toby.x.Johnson@gsk.com

data(clinex) # like plain text export of SAS files
clinex$EXPOSURE <- within(clinex$EXPOSURE, {
  exstdtR <- as.Date(EXSTDT, "%d%b%Y")                
  exendtR <- as.Date(EXENDT, "%d%b%Y")                
})

pgx <- clinex$DEMO
pgx <- merge(pgx,
             pgx.exposure(clinex$DEMO,
                          subset(clinex$EXPOSURE, ACTTRT == "Active")))
head(pgx)