tests/testthat/test_sens_spec.R

test_that("sens_spec works",{
  fit <- logitexp(malaria_df1$fever, malaria_df1$density)
  xx <- senspec(fit,  c(1,100,500,1000,2000,4000,8000,16000, 32000,54000,100000))
  expect_type(xx,"double")
})

Try the afdx package in your browser

Any scripts or data that you put into this service are public.

afdx documentation built on May 25, 2021, 5:09 p.m.