RWDataPlyr

*

tests

  Running ‘testthat.R’ [20s/25s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(RWDataPlyr)
  > 
  > test_check("RWDataPlyr")
  Saving _problems/test_rwd_agg_helpers-24.R
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 659 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_rwd_agg_helpers.R:24:3'): `rwd_agg_template()` creates good files ──
  Error in `basename(x)`: a character vector argument expected
  Backtrace:
      ▆
   1. └─RWDataPlyr::read_rwd_agg(file.path(oPath, "tmp.csv")) at test_rwd_agg_helpers.R:24:3
   2.   └─RWDataPlyr::rwd_agg(utils::read.csv(file, stringsAsFactors = FALSE))
   3.     └─RWDataPlyr:::validate_rwd_agg(new_rwd_agg(x))
   4.       ├─tools::file_ext(x$file) %in% rwd_ext
   5.       └─tools::file_ext(x$file)
   6.         ├─base::ifelse(...)
   7.         ├─base::grepl("^(.*[^.]+.*)[.]([[:alnum:]]+)$", basename(x))
   8.         │ └─base::is.factor(x)
   9.         └─base::basename(x)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 659 ]
  Error:
  ! Test failures.
  Execution halted

*

*

*

*

*

*

*

*

*

*

*

*