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

new setup unit tests

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2023-01-05 15:03:18 +01:00
parent a98d0d75ea
commit 51c0f0814e
5 changed files with 32 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
inst/tinytest/test-mean_amr_distance.R
View File

@ -51,13 +51,13 @@ expect_identical(
)
expect_equal(
mean_amr_distance(data.frame(vctr_mic, vctr_rsi, vctr_disk)),
mean_amr_distance(data.frame(AMX = vctr_mic, GEN = vctr_rsi, TOB = vctr_disk)),
c(-1.10603655, -0.74968823, -0.39333990, -0.03699158, 0.96485397, 1.32120229),
tolerance = 0.00001
)
expect_equal(
mean_amr_distance(data.frame(vctr_mic, vctr_rsi, vctr_disk), 2:3),
mean_amr_distance(data.frame(AMX = vctr_mic, GEN = vctr_rsi, TOB = vctr_disk), 2:3),
c(-0.9909017, -0.7236405, -0.4563792, -0.1891180, 1.0463891, 1.3136503),
tolerance = 0.00001
)