Running 'testthat.R' [3s/4s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(mde)
  Welcome to mde. This is mde version 0.2.1.
   Please file issues and feedback at https://www.github.com/Nelson-Gon/mde/issues
  Turn this message off using 'suppressPackageStartupMessages(library(mde))'
   Happy Exploration :)
  > 
  > test_check("mde")
  == Warnings ====================================================================
  -- Warning (test_na_summary.R:10:5): Test na_summary ---------------------------
  All non grouping values used. Using select non groups is currently not supported
  Backtrace:
   1. testthat::expect_error(...) test_na_summary.R:10:4
   7. mde:::na_summary.data.frame(airquality, grouping_cols = "gibberish")
  -- Warning (test_recode_as_na.R:40:1): Check recoding --------------------------
  Factor columns have been converted to character
  Backtrace:
   1. testthat::expect_true(...) test_recode_as_na.R:40:0
   5. mde:::recode_as_na.data.frame(...)
  
  == Failed tests ================================================================
  -- Error (test_sorting_missingness.R:15:22): sorting only by columns or percents --
  Error: cannot xtfrm data frames
  Backtrace:
       x
    1. +-testthat::expect_equal(...) test_sorting_missingness.R:15:21
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-mde::sort_by_missingness(airquality, sort_by = "percents", descend = TRUE)
    5. \-mde:::sort_by_missingness.data.frame(...)
    6.   +-base::sort(percent_missing(x, ...), decreasing = descending)
    7.   \-base::sort.default(percent_missing(x, ...), decreasing = descending)
    8.     +-x[order(x, na.last = na.last, decreasing = decreasing)]
    9.     +-base::`[.data.frame`(x, order(x, na.last = na.last, decreasing = decreasing))
   10.     \-base::order(x, na.last = na.last, decreasing = decreasing)
   11.       \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   12.         \-base:::FUN(X[[i]], ...)
   13.           +-base::as.vector(xtfrm(x))
   14.           +-base::xtfrm(x)
   15.           \-base::xtfrm.data.frame(x)
  
  [ FAIL 1 | WARN 2 | SKIP 0 | PASS 68 ]
  Error: Test failures
  Execution halted