P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-12 07:01:59 +02:00
Code Releases Activity

(v1.3.0.9025) optimalisation

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-09-19 15:15:57 +02:00
parent 2f0186ace2
commit a1411ddafc
15 changed files with 27 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
tests/testthat/test-mic.R
View File

@ -38,10 +38,10 @@ test_that("mic works", {
expect_warning(as.mic("INVALID VALUE"))
# print plots
expect_success(x <- barplot(as.mic(c(1, 2, 4, 8))))
expect_success(x <- plot(as.mic(c(1, 2, 4, 8))))
expect_success(x <- print(as.mic(c(1, 2, 4, 8))))
pdf(NULL) # prevent Rplots.pdf being created
expect_silent(barplot(as.mic(c(1, 2, 4, 8))))
expect_silent(plot(as.mic(c(1, 2, 4, 8))))
expect_output(print(as.mic(c(1, 2, 4, 8))))
expect_equal(summary(as.mic(c(2, 8))),
structure(c("Class" = "mic",