Running ‘testthat.R’ [8s/10s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(plyr)
  > 
  > test_check("plyr")
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (3)
  • empty test (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-array.r:128:3): single column data frames work when treated as an array ──
  Error in `list_to_dataframe(res, attr(.data, "split_labels"), .id, id_as_factor)`: nrow(labels) == length(null) is not TRUE
  Backtrace:
      █
   1. └─plyr::adply(df, 1, splat(foo)) test-array.r:128:2
   2.   └─plyr::ldply(...)
   3.     └─plyr:::list_to_dataframe(...)
   4.       └─base::stopifnot(nrow(labels) == length(null))
  ── Failure (test-mapply.r:13:3): No expansion creates single output dimension ──
  `x` not equivalent to `expected`.
  Lengths differ: 40 is not 20
  Backtrace:
      █
   1. └─testthat::expect_that(a, is_equivalent_to(1:20 * 2)) test-mapply.r:13:2
   2.   └─testthat:::condition(object)
   3.     └─testthat::expect_equivalent(x, expected, expected.label = label)
  ── Failure (test-mapply.r:16:3): No expansion creates single output dimension ──
  `x` not equal to `expected`.
  Lengths differ: 2 is not 20
  Backtrace:
      █
   1. └─testthat::expect_that(d$X1, equals(1:20)) test-mapply.r:16:2
   2.   └─testthat:::condition(object)
   3.     └─testthat::expect_equal(x, expected, ..., expected.label = label)
  ── Failure (test-mapply.r:17:3): No expansion creates single output dimension ──
  `x` not equal to `expected`.
  Lengths differ: 2 is not 20
  Backtrace:
      █
   1. └─testthat::expect_that(d$V1, equals(1:20 * 2)) test-mapply.r:17:2
   2.   └─testthat:::condition(object)
   3.     └─testthat::expect_equal(x, expected, ..., expected.label = label)
  ── Failure (test-mapply.r:22:3): Expand = TRUE creates multiple output dimensions ──
  `x` not equal to `expected`.
  Lengths differ: 3 is not 2
  Backtrace:
      █
   1. └─testthat::expect_that(dim(a), equals(c(20, 20))) test-mapply.r:22:2
   2.   └─testthat:::condition(object)
   3.     └─testthat::expect_equal(x, expected, ..., expected.label = label)
  ── Error (test-mapply.r:23:3): Expand = TRUE creates multiple output dimensions ──
  Error in `diag(a)`: 'x' is an array, but not one-dimensional.
  Backtrace:
      █
   1. ├─testthat::expect_that(diag(a), is_equivalent_to(1:20 * 2)) test-mapply.r:23:2
   2. │ └─testthat:::condition(object)
   3. │   └─testthat::expect_equivalent(x, expected, expected.label = label)
   4. │     └─testthat::quasi_label(enquo(object), label, arg = "object")
   5. │       └─rlang::eval_bare(expr, quo_get_env(quo))
   6. └─base::diag(a)
  
  [ FAIL 6 | WARN 19 | SKIP 4 | PASS 749 ]
  Error: Test failures
  Execution halted