library(bupaR)
library(eventdataR)
# Check whether MRI Scan is preceded by Blood test.
patients %>%
check_rule(precedence("Blood test","MRI SCAN"))
# Check whether MRI Scan is preceded by Blood test, and the case starts with Registration.
patients %>%
check_rules(rule1 = precedence("Blood test","MRI SCAN"),
rule2 = starts("Registration"))
Run the code above in your browser using DataLab