df <- data.frame(
AVISIT = factor(c(1, 2, 3, 4, 5)),
CHG = c(5, NA, NA, NA, 3)
)
find_missing_chg_after_avisit(df)
df2 <- data.frame(
AVISIT = factor(c(1, 2, 3, 4, 5)),
CHG = c(5, NA, 3, NA, NA)
)
find_missing_chg_after_avisit(df2)
df3 <- data.frame(
AVISIT = factor(c(1, 2, 3, 4, 5)),
CHG = c(NA, NA, NA, NA, NA)
)
find_missing_chg_after_avisit(df3)
Run the code above in your browser using DataLab