A vectorised function to calculate the BAR score to predict patient survival after liver transplantation using a composite of donor and recipient factors.

bar_score(Age, MELD, ReTx, LifeSupport, CIT, DonorAge)

Arguments

Age

numeric vector of recipient ages in years

MELD

numeric vector of MELD scores

ReTx

numeric vector of whether retransplant (1 = "yes", 0 = "no")

LifeSupport

numeric vector of whether on life support pre-transplant (1 = "yes", 0 = "no")

CIT

numeric vector of cold ischaemic time in hours

DonorAge

numeric vector of donor ages

Value

numeric vector of BAR scores

Details

Reference: Dutkowski P, Oberkofler CE, Slankamenac K, et al. Are There Better Guidelines for Allocation in Liver Transplantation? A Novel Score Targeting Justice and Utility in the Model for End-Stage Liver Disease Era. Annals of Surgery 2011; 254:745-753.

Examples

bar_score(Age = 63, MELD = 27, ReTx = 0, LifeSupport = 0, CIT = 9.5, DonorAge = 67)
#> [1] 15