dcut <- data.frame(
USUBJID = rep(c("UXYZ123a"), 7),
DCUTDTC = c(
"2022-06-23", "2022-06-23T16", "2022-06-23T16:57", "2022-06-23T16:57:30",
"2022-06-23T16:57:30.123", "2022-06-23T16:-:30", "2022-06-23T-:57:30"
)
)
dcut_final <- impute_dcutdtc(dsin = dcut, varin = DCUTDTC, varout = DCUTDTM)
Run the code above in your browser using DataLab