Running ‘testthat.R’ [210s/153s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > #  File tests/testthat.R in package ergm.ego, part of the
  > #  Statnet suite of packages for network analysis, https://statnet.org .
  > #
  > #  This software is distributed under the GPL-3 license.  It is free,
  > #  open source, and has the attribution requirements (GPL Section 7) at
  > #  https://statnet.org/attribution .
  > #
  > #  Copyright 2015-2022 Statnet Commons
  > ################################################################################
  > library(testthat)
  > library(ergm.ego)
  Loading required package: ergm
  Loading required package: network
  
  'network' 1.18.1 (2023-01-24), part of the Statnet Project
  * 'news(package="network")' for changes since last version
  * 'citation("network")' for citation information
  * 'https://statnet.org' for help, support, and other information
  
  
  'ergm' 4.4.0 (2023-01-26), part of the Statnet Project
  * 'news(package="ergm")' for changes since last version
  * 'citation("ergm")' for citation information
  * 'https://statnet.org' for help, support, and other information
  
  'ergm' 4 is a major update that introduces some backwards-incompatible
  changes. Please type 'news(package="ergm")' for a list of major
  changes.
  
  Loading required package: egor
  Loading required package: dplyr
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  Loading required package: tibble
  
  'ergm.ego' 1.0.1 (2022-05-26), part of the Statnet Project
  * 'news(package="ergm.ego")' for changes since last version
  * 'citation("ergm.ego")' for citation information
  * 'https://statnet.org' for help, support, and other information
  
  
  Attaching package: 'ergm.ego'
  
  The following objects are masked from 'package:ergm':
  
      COLLAPSE_SMALLEST, snctrl
  
  The following object is masked from 'package:base':
  
      sample
  
  > 
  > test_check("ergm.ego")
  Starting 2 test processes
  [ FAIL 4 | WARN 2 | SKIP 3 | PASS 77 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • Not yet fixed (3)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-gof.ergm.ego.R:15'): GOF='model' works ─────────────────────────
  Error in `if (has_new_tergm()) check_dots_used(error = unused_dots_warning)`: missing value where TRUE/FALSE needed
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(z <- gof(fmhfit, GOF = "model")) at test-gof.ergm.ego.R:15:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─ergm::gof(fmhfit, GOF = "model")
   10. └─ergm.ego:::gof.ergm.ego(fmhfit, GOF = "model")
   11.   ├─stats::simulate(...)
   12.   └─ergm.ego:::simulate.ergm.ego(...)
   13.     ├─stats::simulate(...)
   14.     ├─ergm:::simulate.formula(...)
   15.     │ └─base::eval(cl, parent.frame())
   16.     │   └─base::eval(cl, parent.frame())
   17.     ├─stats::simulate(...)
   18.     └─ergm:::simulate.formula_lhs_network(...)
   19.       ├─ergm::simulate_formula(...)
   20.       └─ergm (local) simulate_formula.network(...)
  ── Error ('test-gof.ergm.ego.R:30'): GOF='degree' works ────────────────────────
  Error in `if (has_new_tergm()) check_dots_used(error = unused_dots_warning)`: missing value where TRUE/FALSE needed
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(z <- gof(fmhfit, GOF = "degree")) at test-gof.ergm.ego.R:30:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─ergm::gof(fmhfit, GOF = "degree")
   10. └─ergm.ego:::gof.ergm.ego(fmhfit, GOF = "degree")
   11.   ├─stats::simulate(...)
   12.   └─ergm.ego:::simulate.ergm.ego(...)
   13.     ├─stats::simulate(...)
   14.     ├─ergm:::simulate.formula(...)
   15.     │ └─base::eval(cl, parent.frame())
   16.     │   └─base::eval(cl, parent.frame())
   17.     ├─stats::simulate(...)
   18.     └─ergm:::simulate.formula_lhs_network(...)
   19.       ├─ergm::simulate_formula(...)
   20.       └─ergm (local) simulate_formula.network(...)
  ── Error ('test-gof.ergm.ego.R:46'): GOF='espartners' works ────────────────────
  Error in `if (has_new_tergm()) check_dots_used(error = unused_dots_warning)`: missing value where TRUE/FALSE needed
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(z <- gof(fmhfit, GOF = "espartners")) at test-gof.ergm.ego.R:46:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─ergm::gof(fmhfit, GOF = "espartners")
   10. └─ergm.ego:::gof.ergm.ego(fmhfit, GOF = "espartners")
   11.   ├─stats::simulate(...)
   12.   └─ergm.ego:::simulate.ergm.ego(...)
   13.     ├─stats::simulate(...)
   14.     ├─ergm:::simulate.formula(...)
   15.     │ └─base::eval(cl, parent.frame())
   16.     │   └─base::eval(cl, parent.frame())
   17.     ├─stats::simulate(...)
   18.     └─ergm:::simulate.formula_lhs_network(...)
   19.       ├─ergm::simulate_formula(...)
   20.       └─ergm (local) simulate_formula.network(...)
  ── Error ('test-gof.ergm.ego.R:70'): GOF='espartners' works if `esp` term is in the model ──
  Error in `if (has_new_tergm()) check_dots_used(error = unused_dots_warning)`: missing value where TRUE/FALSE needed
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(gofobj <- gof(fit, GOF = "espartners")) at test-gof.ergm.ego.R:70:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─ergm::gof(fit, GOF = "espartners")
   10. └─ergm.ego:::gof.ergm.ego(fit, GOF = "espartners")
   11.   ├─stats::simulate(...)
   12.   └─ergm.ego:::simulate.ergm.ego(...)
   13.     ├─stats::simulate(...)
   14.     ├─ergm:::simulate.formula(...)
   15.     │ └─base::eval(cl, parent.frame())
   16.     │   └─base::eval(cl, parent.frame())
   17.     ├─stats::simulate(...)
   18.     └─ergm:::simulate.formula_lhs_network(...)
   19.       ├─ergm::simulate_formula(...)
   20.       └─ergm (local) simulate_formula.network(...)
  
  [ FAIL 4 | WARN 2 | SKIP 3 | PASS 77 ]
  Error: Test failures
  Execution halted