Nothing
tests/testthat/test_misc.R
In trialr: Clinical Trial Designs in 'rstan'
test_that('closest_to_target works', {
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), 0.05), 1)
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), 0.22), 2)
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), -0.05), 1)
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), 8), 3)
})
Try the trialr package in your browser
Any scripts or data that you put into this service are public.
trialr documentation built on April 1, 2023, 12:03 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that('closest_to_target works', {
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), 0.05), 1)
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), 0.22), 2)
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), -0.05), 1)
expect_equal(closest_to_target(c(0.1, 0.2, 0.3), 8), 3)
})
Try the trialr package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.