# generate result
res <- compareR(cass, test1 = "exercise", test2 = "cp",
gold = "angio",
test.names = c("ExerciseStressTest", "ChestPain"))
# run print method
print(res)
Run the code above in your browser using DataLab