tests/testthat/test-convert_ic50s_to_quantiles.R

test_that("use", {

  n <- 4
  ic50s <- seq(1, 2)
  t <- convert_ic50s_to_quantiles(ic50s, n = n)
  expect_equal(nrow(t), n + 1)

})
richelbilderbeek/mhcnpreds documentation built on Nov. 25, 2020, 3:59 a.m.