tests/testthat/test-get_lut.R

In richelbilderbeek/nmhc2ppreds: netmhc2pan Predictions

test_that("use", {
  peptide_length <- 13
  mhc_haplotype <- "DRB1_0103"

  lut <- get_lut(
    peptide_length = peptide_length,
    mhc_haplotype = mhc_haplotype
  )
  lut
})