Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > 
  > test_check("datadr")
  Loading required package: datadr
  OMP: Warning #96: Cannot form a team with 5 threads, using 2 instead.
  OMP: Hint: Consider unsetting KMP_ALL_THREADS and OMP_THREAD_LIMIT (if either is set).
  1. Error: lapply (@test-dataops.R#11) ------------------------------------------
  <text>:3:3: unexpected ','
  2:     lapply(reduce.values, function(r) collect(reduce.key, r))
  3: }),
       ^
  1: drLapply(bySpecies, function(x) mean(x$Sepal.Width)) at testthat/test-dataops.R:11
  2: recombine(data = tmp, combine, output = output, overwrite = overwrite, params = params, 
         packages = packages, control = control, verbose = verbose)
  3: mrExec(data, map = map, reduce = reduce, output = output, overwrite = overwrite, 
         params = c(parList, params), packages = c(globalVarList$packages, packages), 
         control = control)
  4: nullAttributes(reduce)
  5: eval(parse(text = deparse(e)))
  6: parse(text = deparse(e))
  
  2. Error: subset (@test-dataops.R#34) ------------------------------------------
  <text>:12:3: unexpected ','
  11:     collect(reduce.key, df)
  12: }),
        ^
  1: drSubset(a, Sepal.Length > 6, preTransFn = flatten) at testthat/test-dataops.R:34
  2: mrExec(data, map = map, reduce = reduce, params = c(params, parList), packages = packages, 
         control = control)
  3: nullAttributes(reduce)
  4: eval(parse(text = deparse(e)))
  5: parse(text = deparse(e))
  
  3. Error: lapply (@test-dataops.R#59) ------------------------------------------
  <text>:3:3: unexpected ','
  2:     lapply(reduce.values, function(r) collect(reduce.key, r))
  3: }),
       ^
  1: drLapply(bySpecies, function(x) mean(x$Sepal.Width), output = localDiskConn(lapply_path, 
         autoYes = TRUE)) at testthat/test-dataops.R:59
  2: recombine(data = tmp, combine, output = output, overwrite = overwrite, params = params, 
         packages = packages, control = control, verbose = verbose)
  3: mrExec(data, map = map, reduce = reduce, output = output, overwrite = overwrite, 
         params = c(parList, params), packages = c(globalVarList$packages, packages), 
         control = control)
  4: nullAttributes(reduce)
  5: eval(parse(text = deparse(e)))
  6: parse(text = deparse(e))
  
  4. Error: filter (@test-dataops.R#70) ------------------------------------------
  <text>:75:3: unexpected ','
  74:         collect(reduce.key, resDatetime)
  75: }),
        ^
  1: updateAttributes(filterRes) at testthat/test-dataops.R:70
  2: mrExec(obj, map = map, reduce = reduce, params = parList, packages = "datadr", verbose = FALSE, 
         control = control)
  3: nullAttributes(reduce)
  4: eval(parse(text = deparse(e)))
  5: parse(text = deparse(e))
  
  5. Error: subset (@test-dataops.R#86) ------------------------------------------
  <text>:12:3: unexpected ','
  11:     collect(reduce.key, df)
  12: }),
        ^
  1: drSubset(bySpecies2, Sepal.Length > 6) at testthat/test-dataops.R:86
  2: mrExec(data, map = map, reduce = reduce, params = c(params, parList), packages = packages, 
         control = control)
  3: nullAttributes(reduce)
  4: eval(parse(text = deparse(e)))
  5: parse(text = deparse(e))
  
  Error in gg() : object 'b' not found
  6. Error: Other methods with addTransform (@test-globals.R#65) -----------------
  <text>:7:3: unexpected ','
  6:     collect(reduce.key, res)
  7: }),
       ^
  1: drAggregate(logSL ~ slCut, data = bySpeciesLogSL) at testthat/test-globals.R:65
  2: mrExec(data, map = map, reduce = reduce, output = output, params = c(parList, params), 
         packages = packages, control = control)
  3: nullAttributes(reduce)
  4: eval(parse(text = deparse(e)))
  5: parse(text = deparse(e))
  
  * Running map/reduce to get missing attributes...
  Error in parse(text = deparse(e)) : <text>:75:3: unexpected ','
  74:         collect(reduce.key, resDatetime)
  75: }),
        ^
  Calls: test_check ... updateAttributes -> mrExec -> nullAttributes -> eval -> parse
  testthat results ================================================================
  OK: 17 SKIPPED: 0 FAILED: 6
  1. Error: lapply (@test-dataops.R#11) 
  2. Error: subset (@test-dataops.R#34) 
  3. Error: lapply (@test-dataops.R#59) 
  4. Error: filter (@test-dataops.R#70) 
  5. Error: subset (@test-dataops.R#86) 
  6. Error: Other methods with addTransform (@test-globals.R#65) 
  
  Error: testthat unit tests failed
  Execution halted