Running 'testthat.R' [2s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(AlphaSimR)
  Loading required package: R6
  > 
  > test_check("AlphaSimR")
  -- 1. Error: (unknown) (@test-crossing.R#4)  -----------------------------------
  could not find function "trackHaploPop"
  1: .handleSimpleError(function (e) 
     {
         handled <<- TRUE
         test_error <<- e
         options(expressions = expressions_opt_new)
         on.exit(options(expressions = expressions_opt), add = TRUE)
         e$expectation_calls <- frame_calls(11, 2)
         test_error <<- e
         register_expectation(e)
         e$handled <- TRUE
         test_error <<- e
     }, "could not find function \"trackHaploPop\"", quote(trackHaploPop(genMap = genMap, 
         nInd = 2, inbred = TRUE))) at testthat/test-crossing.R:4
  2: eval(code, test_env)
  
  -- 2. Error: editGenome (@test-editGenome.R#5)  --------------------------------
  could not find function "trackHaploPop"
  1: .handleSimpleError(function (e) 
     {
         handled <<- TRUE
         test_error <<- e
         options(expressions = expressions_opt_new)
         on.exit(options(expressions = expressions_opt), add = TRUE)
         e$expectation_calls <- frame_calls(11, 2)
         test_error <<- e
         register_expectation(e)
         e$handled <- TRUE
         test_error <<- e
     }, "could not find function \"trackHaploPop\"", quote(trackHaploPop(genMap = genMap, 
         nInd = 2, inbred = TRUE))) at testthat/test-editGenome.R:5
  2: eval(code, test_env)
  
  -- 3. Error: hybridCross (@test-hybrids.R#5)  ----------------------------------
  could not find function "trackHaploPop"
  1: .handleSimpleError(function (e) 
     {
         handled <<- TRUE
         test_error <<- e
         options(expressions = expressions_opt_new)
         on.exit(options(expressions = expressions_opt), add = TRUE)
         e$expectation_calls <- frame_calls(11, 2)
         test_error <<- e
         register_expectation(e)
         e$handled <- TRUE
         test_error <<- e
     }, "could not find function \"trackHaploPop\"", quote(trackHaploPop(genMap = genMap, 
         nInd = 2, inbred = TRUE))) at testthat/test-hybrids.R:5
  2: eval(code, test_env)
  
  -- 4. Error: calcGCA (@test-hybrids.R#31)  -------------------------------------
  could not find function "trackHaploPop"
  1: .handleSimpleError(function (e) 
     {
         handled <<- TRUE
         test_error <<- e
         options(expressions = expressions_opt_new)
         on.exit(options(expressions = expressions_opt), add = TRUE)
         e$expectation_calls <- frame_calls(11, 2)
         test_error <<- e
         register_expectation(e)
         e$handled <- TRUE
         test_error <<- e
     }, "could not find function \"trackHaploPop\"", quote(trackHaploPop(genMap = genMap, 
         nInd = 2, inbred = TRUE))) at testthat/test-hybrids.R:31
  2: eval(code, test_env)
  
  == testthat results  ===========================================================
  OK: 104 SKIPPED: 1 FAILED: 4
  1. Error: (unknown) (@test-crossing.R#4) 
  2. Error: editGenome (@test-editGenome.R#5) 
  3. Error: hybridCross (@test-hybrids.R#5) 
  4. Error: calcGCA (@test-hybrids.R#31) 
  
  Error: testthat unit tests failed
  Execution halted