Running 'testthat.R' [2s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(biogas)
  > 
  > test_check("biogas")
  [ FAIL 18 | WARN 2 | SKIP 0 | PASS 17 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_HighLevelFunctions.R:9:3'): default methane prediction from COD is stable ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(round(predBg(COD = 1), 4), 349.3842) at test_HighLevelFunctions.R:9:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::predBg(COD = 1)
   5.   └─biogas::molMass("O2")
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_HighLevelFunctions.R:13:3'): default methane prediction from COD is stable with fs argument ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test_HighLevelFunctions.R:13:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::predBg(COD = 1, fs = 0.1)
   5.   └─biogas::molMass("O2")
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_HighLevelFunctions.R:17:3'): default methane prediction from COD is stable with fd argument ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test_HighLevelFunctions.R:17:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::predBg(COD = 1, fd = 0.9)
   5.   └─biogas::molMass("O2")
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_HighLevelFunctions.R:21:3'): default methane prediction from COD is stable ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(round(predBg(COD = 1), 4), 349.3842) at test_HighLevelFunctions.R:21:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::predBg(COD = 1)
   5.   └─biogas::molMass("O2")
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_HighLevelFunctions.R:25:3'): default methane prediction from predBg using a formula is stable ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test_HighLevelFunctions.R:25:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::predBg("C6H10O6")
   5.   ├─base::t(...)
   6.   └─base::mapply(...)
   7.     └─biogas (local) `<fn>`(form = dots[[1L]][[1L]], elements = `<chr>`, min.elements = `<chr>`)
   8.       └─base::options(scipen = oldscipen)
  ── Error ('test_HighLevelFunctions.R:81:3'): cumulative sum, rates and methane volume are corrrectly calculated using mass + one required value for comp, temp and pres ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─base::data.frame(...) at test_HighLevelFunctions.R:81:3
   2. └─biogas::mass2vol(...)
   3.   └─biogas::molMass("CH4")
   4.     └─biogas:::readFormula(f)
   5.       └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:33:3'): readFormula reads correctly the formulas independement from case sensitivity and double letter elements ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test_LowLevelFunctions.R:33:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas:::readFormula("c6h12o6")
   5.   └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:53:3'): molMass results with one letter element are correct ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(molMass("C6H12O6"), mmcellu, tolerance = 0.01) at test_LowLevelFunctions.R:53:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::molMass("C6H12O6")
   5.   └─biogas:::readFormula(f)
   6.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:56:3'): molMass results are not influencend by case sensitivity ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(molMass("c6h12o6"), molMass("C6H12O6")) at test_LowLevelFunctions.R:56:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::molMass("c6h12o6")
   5.   └─biogas:::readFormula(f)
   6.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:60:3'): molMass results is correct for non organic formula - two letter elements ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(molMass("NaCl"), mmNaCl, tolerance = 0.01) at test_LowLevelFunctions.R:60:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::molMass("NaCl")
   5.   └─biogas:::readFormula(f)
   6.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:64:3'): molMass result is correct for formula mixing one and two letter elements ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(molMass("CHONNaClSPK"), mm, tolerance = 0.01) at test_LowLevelFunctions.R:64:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::molMass("CHONNaClSPK")
   5.   └─biogas:::readFormula(f)
   6.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:67:3'): molMass result is correct for formula with parentheses ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(molMass("FeSO4(H2O)7"), 278.0146, tolerance = 0.01) at test_LowLevelFunctions.R:67:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::molMass("FeSO4(H2O)7")
   5.   └─biogas:::readFormula(f)
   6.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:74:3'): calcCOD results with one letter elelement are correct  ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. └─biogas::molMass("C6H12O6") at test_LowLevelFunctions.R:74:3
   2.   └─biogas:::readFormula(f)
   3.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:78:3'): calcCOD results are not influenced by case sensitivity  ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(calcCOD("c6h12o6"), calcCOD("C6H12O6")) at test_LowLevelFunctions.R:78:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::calcCOD("c6h12o6")
   5.   └─biogas::molMass(form)
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:81:3'): calcCOD result is null for non organic formula - two letter elements ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(calcCOD("NaCl"), 0) at test_LowLevelFunctions.R:81:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::calcCOD("NaCl")
   5.   └─biogas::molMass(form)
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:84:3'): calcCOD gives correct vectorized results ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test_LowLevelFunctions.R:84:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─biogas::calcCOD("CH3CH2OH")
   5.   └─biogas::molMass(form)
   6.     └─biogas:::readFormula(f)
   7.       └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:102:3'): vol2mass results are stables ──────
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. └─biogas::molMass("CH4") at test_LowLevelFunctions.R:102:3
   2.   └─biogas:::readFormula(f)
   3.     └─base::options(scipen = oldscipen)
  ── Error ('test_LowLevelFunctions.R:117:3'): mass2vol non vectorised result is correct ──
  Error in `options(scipen = oldscipen)`: invalid 'scipen'
  Backtrace:
      ▆
   1. └─biogas::molMass("CH4") at test_LowLevelFunctions.R:117:3
   2.   └─biogas:::readFormula(f)
   3.     └─base::options(scipen = oldscipen)
  
  [ FAIL 18 | WARN 2 | SKIP 0 | PASS 17 ]
  Error: Test failures
  Execution halted