View source: R/check_vs_vsdtc_after_dd.R
check_vs_vsdtc_after_dd | R Documentation |
This check looks for VS dates that occur after death date
check_vs_vsdtc_after_dd(AE, DS, VS)
AE |
Adverse Event SDTM dataset with variables USUBJID, AEDTHDTC, AESTDTC, AEDECOD, and AETERM |
DS |
Disposition SDTM dataset with variables USUBJID, DSSTDTC, DSDECOD, and DSTERM |
VS |
Vital Signs SDTM dataset with variables USUBJID, VSDTC, VSTESTCD, and VSORRES |
Boolean value for whether the check passed or failed, with 'msg' attribute if the check failed
Nina Ting Qi
AE <- data.frame(STUDYID = 1:5, USUBJID = LETTERS[1:5],
AEDTHDTC = c(rep("", 4), "2016-01-01"),
AESTDTC = rep("2016-01-01", 5),
AEDECOD = LETTERS[1:5], AETERM = LETTERS[1:5],
stringsAsFactors = FALSE)
DS <- data.frame(STUDYID = 1:5, USUBJID = LETTERS[1:5],
DSSTDTC = rep("2016-01-02", 5),
DSDECOD = c(LETTERS[1:4], "death"),
DSTERM = letters[1:5],
stringsAsFactors = FALSE)
VS <- data.frame(STUDYID = 1:5, USUBJID = LETTERS[1:5],
VSDTC = rep("2015-12-31", 5),
VSTESTCD = letters[1:5],
VSORRES = 1:5,
stringsAsFactors = FALSE)
check_vs_vsdtc_after_dd(AE, DS, VS)
VS$VSDTC[1] <- "2016-01-03"
VS$USUBJID[1] <- VS$USUBJID[5]
check_vs_vsdtc_after_dd(AE, DS, VS)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.