https://github.com/cran/bayestestR
Tip revision: fe07bfa906d7e155439160caee538a3449cd3877 authored by Dominique Makowski on 08 April 2019, 08:42:41 UTC
version 0.1.0
version 0.1.0
Tip revision: fe07bfa
test-p_map.R
context("p_map")
test_that("p_map", {
testthat::expect_equal(as.numeric(p_map(rnorm_perfect(1000))), 1, tolerance = 0.01)
testthat::expect_equal(as.numeric(p_map(rnorm_perfect(1000, 1, 1))), 0.62, tolerance = 0.01)
testthat::expect_equal(as.numeric(p_map(rnorm_perfect(1000, 2, 1))), 0.15, tolerance = 0.01)
testthat::expect_equal(as.numeric(p_map(rnorm_perfect(1000, 3, 0.01))), 0, tolerance = 0.01)
})
