R/liver_scores.R
et_dri.RdA vectorised function to calculate the Eurotransplant Donor Risk Index for liver transplantation. The ET-DRI is a variant of the American DRI published by Feng et al but adapted to the European population. The American liver DRI is available using the transplantr::liver_dri() function.
et_dri(age, cod, dcd, split, share, cit, ggt, rescue)
| age | numeric vector of patient ages in years |
|---|---|
| cod | character string vector of donor causes of death, one of "trauma", "anoxia", "cva" or "other" |
| dcd | numeric vector of whether DCD (1 = yes, 0 = no) |
| split | numeric vector of whether liver split (1 = yes, 0 = no) |
| share | character string vector of type of sharing, one of "local", regional" or "national" |
| cit | numeric vector of cold ischaemic times in hours |
| ggt | numeric vector of last pre-transplant serum gamma-GT level in IU/l |
| rescue | numeric vector of whether rescue transplant (1 = yes, 0 = no) |
numeric vector of ET-DRI scores
Reference: Braat AE, Blok JJ, Putter H, et al. The Eurotransplant Donor Risk Index in Liver Transplantation: ET-DRI. American Journal of Transplantation 2012; 12:2789–2796.
et_dri(age = 39, cod = "trauma", dcd = 0, split = 0, share = "local", cit = 8, ggt = 50, rescue = 0) # 1.00#> [1] 1et_dri(age = 25, cod = "cva", dcd = 0, split = 0, share = "local", cit = 8, ggt = 50, rescue = 0) # 1.15#> [1] 1.149354