Running ‘testthat.R’ [9s/10s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(datacutr)
  > 
  > test_check("datacutr")
  [1] "At least 1 patient with missing datacut date."
  [1] "At least 1 patient with missing datacut date, all records will be kept."
  [1] "At least 1 patient with missing datacut date, all records will be kept."
  [ FAIL 4 | WARN 4 | SKIP 0 | PASS 55 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-process_cut.R:180:3'): Test that Correct .Rmd file is ran successfully when read_out = TRUE ──
  Error in `file(con, "w")`: cannot open the connection
  Backtrace:
      ▆
   1. └─datacutr::process_cut(...) at test-process_cut.R:180:3
   2.   └─datacutr::read_out(...)
   3.     └─rmarkdown::render(...)
   4.       └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
   5.         └─xfun::write_utf8(res, output)
   6.           └─base::writeLines(enc2utf8(text), con, ..., useBytes = TRUE)
   7.             └─base::file(con, "w")
  ── Error ('test-process_cut.R:224:3'): Test that Correct .Rmd file is ran successfully when read_out = TRUE ──
  Error in `file(con, "w")`: cannot open the connection
  Backtrace:
      ▆
   1. └─datacutr::process_cut(...) at test-process_cut.R:224:3
   2.   └─datacutr::read_out(...)
   3.     └─rmarkdown::render(...)
   4.       └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
   5.         └─xfun::write_utf8(res, output)
   6.           └─base::writeLines(enc2utf8(text), con, ..., useBytes = TRUE)
   7.             └─base::file(con, "w")
  ── Error ('test-read_out.R:79:3'): Correct .Rmd file is run successfully when fields contain correct data inputs ──
  Error in `file(con, "w")`: cannot open the connection
  Backtrace:
      ▆
   1. └─datacutr::read_out(...) at test-read_out.R:79:3
   2.   └─rmarkdown::render(...)
   3.     └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
   4.       └─xfun::write_utf8(res, output)
   5.         └─base::writeLines(enc2utf8(text), con, ..., useBytes = TRUE)
   6.           └─base::file(con, "w")
  ── Error ('test-read_out.R:95:3'): Correct .Rmd file is ran successfully when fields are empty ──
  Error in `file(con, "w")`: cannot open the connection
  Backtrace:
      ▆
   1. └─datacutr::read_out(out_path = tempdir()) at test-read_out.R:95:3
   2.   └─rmarkdown::render(...)
   3.     └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
   4.       └─xfun::write_utf8(res, output)
   5.         └─base::writeLines(enc2utf8(text), con, ..., useBytes = TRUE)
   6.           └─base::file(con, "w")
  
  [ FAIL 4 | WARN 4 | SKIP 0 | PASS 55 ]
  Error: Test failures
  Execution halted