1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-11 22:21:53 +02:00

unit tests

This commit is contained in:
2023-02-14 15:59:40 +01:00
parent a4cd38c433
commit 8d37c75860
8 changed files with 13 additions and 36 deletions

View File

@ -63,11 +63,7 @@ x <- as.data.frame(
# expect_warning(g.test(x))
expect_true(suppressWarnings(g.test(x)$p.value) < 1)
# expect_warning(g.test(
x = c(772, 1611, 737),
y = c(780, 1560, 780),
rescale.p = TRUE
))
# expect_warning(g.test(x = c(772, 1611, 737), y = c(780, 1560, 780), rescale.p = TRUE))
expect_error(g.test(matrix(data = c(-1, -2, -3, -4), ncol = 2, byrow = TRUE)))
expect_error(g.test(matrix(data = c(0, 0, 0, 0), ncol = 2, byrow = TRUE)))