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/nmhc2ppreds documentation built on Aug. 21, 2021, 10:45 a.m.