Running 'testthat.R' [5s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(tensorr)
  
  Attaching package: 'tensorr'
  
  The following object is masked from 'package:base':
  
      norm
  
  > 
  > test_check("tensorr")
  -- 1. Error: unfolded sparse tensor shows outputs (@test-sparse-unfold.r#52)  --
  could not find function "isFALSE"
  1: expect_output(show(unfold(X, 1))) at testthat/test-sparse-unfold.r:52
  2: quasi_capture(enquo(object), capture_output, label = label)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: capture_output_lines(code, print, width = width)
  5: eval_with_output(code, print = print, width = width)
  6: withr::with_output_sink(temp, withVisible(code))
  7: force(code)
  8: withVisible(code)
  9: eval_bare(get_expr(quo), get_env(quo))
  10: show(unfold(X, 1))
  11: show(unfold(X, 1))
  12: print(x@mat)
  13: print.default(x@mat)
  14: structure(function (object) 
     standardGeneric("show"), generic = structure("show", package = "methods"), package = "methods", group = list(), valueClass = character(0), signature = structure("object", simpleOnly = TRUE), default = structure(function (object) 
     showDefault(object, FALSE), target = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), defined = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), generic = structure("show", package = "methods"), class = structure("derivedDefaultMethod", package = "methods")), skeleton = (structure(function (object) 
     showDefault(object, FALSE), target = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), defined = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), generic = structure("show", package = "methods"), class = structure("derivedDefaultMethod", package = "methods")))(object), class = structure("standardGeneric", package = "methods"))(<S4 object of class structure("dgTMatrix", package = "Matrix")>)
  15: structure(function (object) 
     standardGeneric("show"), generic = structure("show", package = "methods"), package = "methods", group = list(), valueClass = character(0), signature = structure("object", simpleOnly = TRUE), default = structure(function (object) 
     showDefault(object, FALSE), target = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), defined = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), generic = structure("show", package = "methods"), class = structure("derivedDefaultMethod", package = "methods")), skeleton = (structure(function (object) 
     showDefault(object, FALSE), target = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), defined = structure("ANY", class = structure("signature", package = "methods"), .Names = "object", package = "methods"), generic = structure("show", package = "methods"), class = structure("derivedDefaultMethod", package = "methods")))(object), class = structure("standardGeneric", package = "methods"))(<S4 object of class structure("dgTMatrix", package = "Matrix")>)
  16: printSpMatrix2(object)
  
  == testthat results  ===========================================================
  OK: 284 SKIPPED: 0 FAILED: 1
  1. Error: unfolded sparse tensor shows outputs (@test-sparse-unfold.r#52) 
  
  Error: testthat unit tests failed
  Execution halted