Running ‘testthat.R’ [7s/9s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(praznik)
  > 
  > test_check("praznik")
  ── 1. Error: Crazy decision works (@test-input.R#6)  ───────────────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(names(MIM(X, Y, 1)$selection), "A")
   4. praznik::MIM(X, Y, 1)
  
  ── 2. Error: Magical cut works like R cut (@test-input.R#69)  ──────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(...)
   4. praznik::miScores(...)
  
  ── 3. Error: Native CMI works like pure CMI (@test-native-pure.R#12)  ──────────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureCMI(...)
   3. praznik::miScores(X, Y)
  
  ── 4. Error: Native MIM works like pure MIM (@test-native-pure.R#12)  ──────────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 5. Error: Native JMIM works like pure JMIM (@test-native-pure.R#12)  ────────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureJMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 6. Error: Native NJMIM works like pure NJMIM (@test-native-pure.R#12)  ──────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureNJMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 7. Error: Native JMI works like pure JMI (@test-native-pure.R#12)  ──────────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureJMI(...)
   3. praznik::miScores(X, Y)
  
  ── 8. Error: Native DISR works like pure DISR (@test-native-pure.R#12)  ────────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureDISR(...)
   3. praznik::miScores(X, Y)
  
  ── 9. Error: Native CMIM works like pure CMIM (@test-native-pure.R#12)  ────────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureCMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 10. Error: Native MRMR works like pure MRMR (@test-native-pure.R#12)  ───────
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureMRMR(...)
   3. praznik::miScores(X, Y)
  
  ── 11. Error: Native CMI works like pure CMI with truncation (@test-native-pure.
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureCMI(...)
   3. praznik::miScores(X, Y)
  
  ── 12. Error: Native MIM works like pure MIM with truncation (@test-native-pure.
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 13. Error: Native JMIM works like pure JMIM with truncation (@test-native-pur
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureJMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 14. Error: Native NJMIM works like pure NJMIM with truncation (@test-native-p
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureNJMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 15. Error: Native JMI works like pure JMI with truncation (@test-native-pure.
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureJMI(...)
   3. praznik::miScores(X, Y)
  
  ── 16. Error: Native DISR works like pure DISR with truncation (@test-native-pur
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureDISR(...)
   3. praznik::miScores(X, Y)
  
  ── 17. Error: Native CMIM works like pure CMIM with truncation (@test-native-pur
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureCMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 18. Error: Native MRMR works like pure MRMR with truncation (@test-native-pur
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureMRMR(...)
   3. praznik::miScores(X, Y)
  
  ── 19. Error: Native CMI works like pure CMI with spoiler (@test-native-pure.R#4
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureCMI(...)
   3. praznik::miScores(X, Y)
  
  ── 20. Error: Native MIM works like pure MIM with spoiler (@test-native-pure.R#4
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 21. Error: Native JMIM works like pure JMIM with spoiler (@test-native-pure.R
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureJMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 22. Error: Native NJMIM works like pure NJMIM with spoiler (@test-native-pure
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureNJMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 23. Error: Native JMI works like pure JMI with spoiler (@test-native-pure.R#4
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureJMI(...)
   3. praznik::miScores(X, Y)
  
  ── 24. Error: Native DISR works like pure DISR with spoiler (@test-native-pure.R
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureDISR(...)
   3. praznik::miScores(X, Y)
  
  ── 25. Error: Native CMIM works like pure CMIM with spoiler (@test-native-pure.R
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureCMIM(...)
   3. praznik::miScores(X, Y)
  
  ── 26. Error: Native MRMR works like pure MRMR with spoiler (@test-native-pure.R
  Wrong X[,1] type
  Backtrace:
   1. base::do.call(sprintf("pure%s", algo), input)
   2. praznik:::pureMRMR(...)
   3. praznik::miScores(X, Y)
  
  ── 27. Error: mi works like pure mi (@test-native-pure.R#56)  ──────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(apply(X, 2, mutinfo, Y), miScores(X, Y))
   4. praznik::miScores(X, Y)
  
  ── 28. Error: cmi works like pure cmi (@test-native-pure.R#76)  ────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(...)
   4. praznik::cmiScores(X, Y, Z)
  
  ── 29. Error: cmi behaves properly (@test-native-pure.R#83)  ───────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(...)
   4. praznik::cmiScores(X, Y, factor(1:150))
  
  ── 30. Error: h behaves properly (@test-native-pure.R#98)  ─────────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(hScores(X), apply(X, 2, entro))
   4. praznik::hScores(X)
  
  ── 31. Error: jmi behaves properly (@test-native-pure.R#106)  ──────────────────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(...)
   4. praznik::jmiScores(X, Y, factor(1:150))
  
  ── 32. Error: impurity scores agree with pure (@test-native-pure.R#139)  ───────
  Wrong X[,1] type
  Backtrace:
   1. testthat::expect_equal(impScores(X, Y), pureImp(X, Y))
   4. praznik::impScores(X, Y)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  [ OK: 111 | SKIPPED: 0 | WARNINGS: 0 | FAILED: 32 ]
  1. Error: Crazy decision works (@test-input.R#6) 
  2. Error: Magical cut works like R cut (@test-input.R#69) 
  3. Error: Native CMI works like pure CMI (@test-native-pure.R#12) 
  4. Error: Native MIM works like pure MIM (@test-native-pure.R#12) 
  5. Error: Native JMIM works like pure JMIM (@test-native-pure.R#12) 
  6. Error: Native NJMIM works like pure NJMIM (@test-native-pure.R#12) 
  7. Error: Native JMI works like pure JMI (@test-native-pure.R#12) 
  8. Error: Native DISR works like pure DISR (@test-native-pure.R#12) 
  9. Error: Native CMIM works like pure CMIM (@test-native-pure.R#12) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted