Skip to contents

creates a sample of HLA antibodies (abs) for a given candidate according with a cPRA value.

Usage

antbs(
  cA = c("2", "29"),
  cB = c("7", "15"),
  cDR = c("4", "7"),
  cPRA = 85,
  origin = "PT",
  seed.number = 3
)

Arguments

cA

candidate's HLA-A typing

cB

candidate's HLA-B typing

cDR

candidate's HLA-DR typing

cPRA

candidate's cPRA value

origin

A character value from options: 'PT', 'API', 'AFA', 'CAU' and 'HIS'

seed.number

a numeric seed that will be used for random number generation.

Value

a character vector with HLA abs.

Examples

antbs(cA = c('2','29'), cB = c('7','15'), cDR = c('4','7'),
cPRA = 85, origin = 'PT', seed.number = 3)
#> $cPRA
#> [1] 85
#> 
#> $vPRA
#> [1] 82.8
#> 
#> $HLA
#> [1] "A2"  "A29" "B7"  "B15" "DR4" "DR7"
#> 
#> $Valid.Ags
#>  [1] "A1"   "A11"  "A23"  "A24"  "A25"  "A26"  "A3"   "A30"  "A31"  "A32" 
#> [11] "A33"  "A34"  "A36"  "A66"  "A68"  "A69"  "A74"  "A80"  "B13"  "B14" 
#> [21] "B18"  "B27"  "B35"  "B37"  "B38"  "B39"  "B40"  "B41"  "B42"  "B44" 
#> [31] "B45"  "B46"  "B47"  "B48"  "B49"  "B50"  "B51"  "B52"  "B53"  "B54" 
#> [41] "B55"  "B56"  "B57"  "B58"  "B67"  "B73"  "B78"  "B8"   "B81"  "B82" 
#> [51] "DR1"  "DR10" "DR11" "DR12" "DR13" "DR14" "DR15" "DR16" "DR3"  "DR8" 
#> [61] "DR9" 
#> 
#> $Abs
#>  [1] "A25"  "DR16" "A34"  "B53"  "B50"  "DR16" "B54"  "B57"  "B45"  "A30" 
#> [11] "B14"  "A32"  "DR13" "B54"  "B8"   "B54"  "A30"  "B51"  "A11"  "B42" 
#> [21] "B58"  "B67"  "A25"  "B54"  "B51"  "A31" 
#>