Running ‘spelling.R’ [0s/0s]
  Running ‘testthat.R’ [59s/60s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # This file is part of the standard setup for testthat.
  > # It is recommended that you do not modify it.
  > #
  > # Where should you do additional test configuration?
  > # Learn more about the roles of various files in:
  > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
  > # * https://testthat.r-lib.org/articles/special-files.html
  > 
  > library(testthat)
  > library(tidyplate)
  > 
  > test_check("tidyplate")
  Saving _problems/test-generate_plate-76.R
  [ FAIL 2 | WARN 4 | SKIP 0 | PASS 646 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-generate_plate.R:55:5'): generate_plate transforms plate data for multiple plate types ──
  Error in `zip_internal(zipfile, files, recurse, compression_level, append = FALSE, root = root, keep_path = (mode == "mirror"), include_directories = include_directories)`: zip error: Cannot open zip file `file2cb35c262ca43b.xlsx` for writing in file zip.c:350
  Backtrace:
      ▆
   1. └─tidyplate::generate_plate(plate_xl, "well", plate_type, temp_xlsx) at test-generate_plate.R:55:5
   2.   └─openxlsx::write.xlsx(...)
   3.     └─openxlsx::saveWorkbook(wb, file = file, overwrite = overwrite)
   4.       └─wb$saveWorkbook()
   5.         └─zip::zipr(...)
   6.           └─zip:::zip_internal(...)
  ── Error ('test-generate_plate.R:74:5'): generate_plate requires plate_type to be 1536 for AA-AF wells ──
  Error in `file(file, if (append) "a" else "w")`: cannot open the connection
  Backtrace:
      ▆
   1. └─testthat::expect_silent(...) at test-generate_plate.R:74:5
   2.   └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
   3.     └─testthat (local) .capture(...)
   4.       └─withr::with_output_sink(...)
   5.         └─withr:::set_output_sink(file = new, append = append, split = split)
   6.           └─withr:::output_sink(file = file, append = append, split = split)
   7.             └─base::sink(file = file, append = append, type = "output", split = split)
   8.               └─base::file(file, if (append) "a" else "w")
  
  [ FAIL 2 | WARN 4 | SKIP 0 | PASS 646 ]
  Error:
  ! Test failures.
  Execution halted