Running ‘testthat.R’ [17s/20s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > if (nzchar(system.file(package = "testthat"))) {
  +     library(testthat)
  +     library(jmvReadWrite)
  + 
  +     test_check("jmvReadWrite")
  + }
  
  Attaching package: 'jmvReadWrite'
  
  The following object is masked from 'package:datasets':
  
      ToothGrowth
  
  [ FAIL 10 | WARN 10 | SKIP 0 | PASS 750 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-arrange_cols_omv.R:116:5'): arrange_cols_omv works ───────────
  attr(df4Chk, "syntax") (`actual`) not equal to c(...) (`expected`).
  
  `actual` is NULL
  `expected` is a character vector ('jmv::ANOVA(formula = len ~ supp + dose2 + supp:dose2, data = data, effectSize = "partEta", modelTest = TRUE, qq = TRUE, contrasts = list(list(var="supp", type="none"), list(var="dose2", type="polynomial")), postHoc = ~ supp + dose2, emMeans = ~ dose2:supp)', 'jmv::ancova(formula = len ~ supp + dose, data = data, effectSize = "partEta", modelTest = TRUE)')
  ── Error ('test-describe_omv.R:20:9'): describe_omv works ──────────────────────
  Error in `describe_omv(dtaInp = jmvReadWrite::ToothGrowth[, c("len", "supp", 
      "dose")], fleOut = nmeOut, dtaTtl = "ToothGrowth", dtaDsc = lstDsc)`: The R-packages RProtoBuf and jmvcore must be installed for using describe_omv (see warnings() for further details).
  Backtrace:
      ▆
   1. └─jmvReadWrite::describe_omv(...) at test-describe_omv.R:20:9
  ── Failure ('test-globals.R:40:5'): globals work ───────────────────────────────
  jmvPtB() is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-globals.R:41:5'): globals work ─────────────────────────────────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'RProtoBuf'
  Backtrace:
      ▆
   1. ├─jmvReadWrite:::var2PB(...) at test-globals.R:41:5
   2. │ └─jmvReadWrite:::var2PB(inpVar[[i]])
   3. │   └─jmvReadWrite:::var2PB(inpVar[[i]])
   4. └─base::loadNamespace(x)
   5.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   6.     └─base (local) withOneRestart(expr, restarts[[1L]])
   7.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-label_vars_omv.R:99:5'): label_vars_omv works ────────────────
  attr(df4Chk, "syntax") (`actual`) not equal to c(...) (`expected`).
  
  `actual` is NULL
  `expected` is a character vector ('jmv::ANOVA(formula = len ~ supp + dose2 + supp:dose2, data = data, effectSize = "partEta", modelTest = TRUE, qq = TRUE, contrasts = list(list(var="supp", type="none"), list(var="dose2", type="polynomial")), postHoc = ~ supp + dose2, emMeans = ~ dose2:supp)', 'jmv::ancova(formula = len ~ supp + dose, data = data, effectSize = "partEta", modelTest = TRUE)')
  ── Failure ('test-merge_cols_omv.R:112:5'): merge_cols_omv works ───────────────
  attr(df4Chk, "syntax") (`actual`) not equal to c(...) (`expected`).
  
  `actual` is NULL
  `expected` is a character vector ('jmv::ANOVA(formula = len ~ supp + dose2 + supp:dose2, data = data, effectSize = "partEta", modelTest = TRUE, qq = TRUE, contrasts = list(list(var="supp", type="none"), list(var="dose2", type="polynomial")), postHoc = ~ supp + dose2, emMeans = ~ dose2:supp)', 'jmv::ancova(formula = len ~ supp + dose, data = data, effectSize = "partEta", modelTest = TRUE)')
  ── Failure ('test-read_omv.R:58:5'): read_omv works ────────────────────────────
  names(attributes(df4Chk)) (`actual`) not equal to c("names", "row.names", "class", "fltLst", "syntax", "protobuf") (`expected`).
  
  `actual[2:5]`:   "row.names" "class" "fltLst" "protobuf"           
  `expected[2:6]`: "row.names" "class" "fltLst" "syntax"   "protobuf"
  ── Error ('test-read_omv.R:60:5'): read_omv works ──────────────────────────────
  <vctrs_error_scalar_type/vctrs_error/rlang_error/error/condition>
  Error in `expect_vector(attr(df4Chk, "syntax"), c(), 2)`: `attr(df4Chk, "syntax")` must be a vector, not `NULL`.
  Backtrace:
      ▆
   1. └─testthat::expect_vector(attr(df4Chk, "syntax"), c(), 2) at test-read_omv.R:60:5
   2.   ├─base::tryCatch(...)
   3.   │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4.   │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5.   │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6.   └─vctrs::vec_assert(act$val, ptype = ptype, size = size, arg = act$lab)
   7.     └─vctrs:::stop_scalar_type(x, arg, call = call)
   8.       └─vctrs:::stop_vctrs(...)
   9.         └─rlang::abort(message, class = c(class, "vctrs_error"), ..., call = call)
  ── Failure ('test-sort_omv.R:64:5'): sort_omv works ────────────────────────────
  attr(df4Chk, "syntax") (`actual`) not equal to c(...) (`expected`).
  
  `actual` is NULL
  `expected` is a character vector ('jmv::ANOVA(formula = len ~ supp + dose2 + supp:dose2, data = data, effectSize = "partEta", modelTest = TRUE, qq = TRUE, contrasts = list(list(var="supp", type="none"), list(var="dose2", type="polynomial")), postHoc = ~ supp + dose2, emMeans = ~ dose2:supp)', 'jmv::ancova(formula = len ~ supp + dose, data = data, effectSize = "partEta", modelTest = TRUE)')
  ── Error ('test-write_omv.R:154:5'): write_omv works ───────────────────────────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'RProtoBuf'
  Backtrace:
      ▆
   1. └─base::loadNamespace(x) at test-write_omv.R:154:5
   2.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   3.     └─base (local) withOneRestart(expr, restarts[[1L]])
   4.       └─base (local) doWithOneRestart(return(expr), restart)
  
  [ FAIL 10 | WARN 10 | SKIP 0 | PASS 750 ]
  Error: Test failures
  Execution halted