A vectorised function to calculate the Pedi-SOFT score used to predict survival after liver transplantation in children.
pedi_soft(CTVG, Weight, Dx, LifeSupport, PrevTx)
numeric vector of whether cadaveric technical variant graft (1 for "yes", 0 for "no")
numeric vector of recipient weight in kg
numeric vector of whether on dialysis or creatinine clearance under 30 (1 for "yes", 0 for "no")
numeric vector of whether on life support pre-transplant (1 for "yes", 0 for "no")
numeric vector of number of previous liver transplants
numeric vector of Pedi-SOFT scores
Reference: Rana A, Pallister ZS, Guiteau JJ, et al. Survival Outcomes Following Pediatric Liver Transpantation (Pedi-SOFT) Score: A Novel Predictive Index. American Journal of Transplantation 2015; 15:1855-1863.
pedi_soft(CTVG = 1, Weight = 10, Dx = 0, LifeSupport = 0, PrevTx = 0) # 4#>  4