Running 'testthat.R' [38s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > if (require("testthat")) {
  +     test_check("surveillance")
  + }
  Loading required package: testthat
  Loading required package: surveillance
  Loading required package: sp
  Loading required package: xtable
  This is surveillance 1.18.0. For overview type 'help(surveillance)'.
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 3.823851e-07"
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 1.593786e-07"
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 3.802426e-07"
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 2.963796e-07"
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 1.760352e-07"
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 5.869441e-07"
  
  Penalized log-likelihood:
  Checking analytical score vector using numDeriv::grad() ...
  [1] TRUE
  Checking analytical Fisher information matrix using numDeriv::hessian() ...
  [1] "Mean relative difference: 1.330907e-07"
  'F' vs. cubature using method = "midpoint" ... 'F' vs. cubature using method = "SV" ... Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  'F' vs. cubature using method = "SV" ... Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  'F' vs. cubature using method = "SV" ... 'F' vs. cubature using method = "SV" ... Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  'F' vs. cubature using method = "midpoint" ... Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  Checking 'intrfr' against a numeric approximation ... OK
  'F' vs. cubature using method = "SV" ... 'F' vs. cubature using method = "midpoint" ... == Failed tests ================================================================
  -- Error (test-siafs.R:25:5): Gaussian 'F.adaptive' implementation agrees with numerical approximation --
  Error: inapplicable choice of bandwidth (eps=0.025) in midpoint rule:
  Error in loadNamespace(name): there is no package called 'spatstat.geom'
  
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::F(LETTERR, f, pars, type)
    8.             \-polyCub::polyCub.midpoint(polydomain, f, pars, type, eps = eps)
    9.               \-base::tryCatch(...)
   10.                 \-base:::tryCatchList(expr, classes, parentenv, handlers)
   11.                   \-base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   12.                     \-value[[3L]](cond)
  -- Error (test-siafs.R:25:5): Gaussian iso-C-implementation agrees with numerical approximation --
  Error: there is no package called 'spatstat.geom'
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             \-polyCub::polyCub.SV(...)
    9.               +-polyCub::xylist(polyregion)
   10.               \-polyCub:::xylist.owin(polyregion)
   11.                 \-spatstat.geom::as.polygonal
   12.                   \-base::getExportedValue(pkg, name)
   13.                     \-base::asNamespace(ns)
   14.                       \-base::getNamespace(ns)
   15.                         \-base::loadNamespace(name)
   16.                           \-base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   17.                             \-base:::withOneRestart(expr, restarts[[1L]])
   18.                               \-base:::doWithOneRestart(return(expr), restart)
  -- Error (test-siafs.R:25:5): Exponential implementation agrees with numerical approximation --
  Error: there is no package called 'spatstat.geom'
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             \-polyCub::polyCub.SV(...)
    9.               +-polyCub::xylist(polyregion)
   10.               \-polyCub:::xylist.owin(polyregion)
   11.                 \-spatstat.geom::as.polygonal
   12.                   \-base::getExportedValue(pkg, name)
   13.                     \-base::asNamespace(ns)
   14.                       \-base::getNamespace(ns)
   15.                         \-base::loadNamespace(name)
   16.                           \-base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   17.                             \-base:::withOneRestart(expr, restarts[[1L]])
   18.                               \-base:::doWithOneRestart(return(expr), restart)
  -- Error (test-siafs.R:25:5): Power-law implementation agrees with numerical approximation --
  Error: there is no package called 'spatstat.geom'
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             \-polyCub::polyCub.SV(...)
    9.               +-polyCub::xylist(polyregion)
   10.               \-polyCub:::xylist.owin(polyregion)
   11.                 \-spatstat.geom::as.polygonal
   12.                   \-base::getExportedValue(pkg, name)
   13.                     \-base::asNamespace(ns)
   14.                       \-base::getNamespace(ns)
   15.                         \-base::loadNamespace(name)
   16.                           \-base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   17.                             \-base:::withOneRestart(expr, restarts[[1L]])
   18.                               \-base:::doWithOneRestart(return(expr), restart)
  -- Error (test-siafs.R:25:5): 1-parameter power-law agrees with numerical approximations --
  Error: there is no package called 'spatstat.geom'
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             \-polyCub::polyCub.SV(...)
    9.               +-polyCub::xylist(polyregion)
   10.               \-polyCub:::xylist.owin(polyregion)
   11.                 \-spatstat.geom::as.polygonal
   12.                   \-base::getExportedValue(pkg, name)
   13.                     \-base::asNamespace(ns)
   14.                       \-base::getNamespace(ns)
   15.                         \-base::loadNamespace(name)
   16.                           \-base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   17.                             \-base:::withOneRestart(expr, restarts[[1L]])
   18.                               \-base:::doWithOneRestart(return(expr), restart)
  -- Error (test-siafs.R:25:5): Lagged power-law implementation agrees with numeric results --
  Error: inapplicable choice of bandwidth (eps=NULL) in midpoint rule:
  Error in loadNamespace(name): there is no package called 'spatstat.geom'
  
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             +-polyCub::polyCub(...)
    9.             | \-base::eval(cl, parent.frame())
   10.             |   \-base::eval(cl, parent.frame())
   11.             \-polyCub::polyCub.midpoint(...)
   12.               \-base::tryCatch(...)
   13.                 \-base:::tryCatchList(expr, classes, parentenv, handlers)
   14.                   \-base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   15.                     \-value[[3L]](cond)
  -- Error (test-siafs.R:25:5): Student implementation agrees with numerical approximation --
  Error: there is no package called 'spatstat.geom'
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             \-polyCub::polyCub.SV(...)
    9.               +-polyCub::xylist(polyregion)
   10.               \-polyCub:::xylist.owin(polyregion)
   11.                 \-spatstat.geom::as.polygonal
   12.                   \-base::getExportedValue(pkg, name)
   13.                     \-base::asNamespace(ns)
   14.                       \-base::getNamespace(ns)
   15.                         \-base::loadNamespace(name)
   16.                           \-base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   17.                             \-base:::withOneRestart(expr, restarts[[1L]])
   18.                               \-base:::doWithOneRestart(return(expr), restart)
  -- Error (test-siafs.R:25:5): Step kernel implementation agrees with numerical approximation --
  Error: inapplicable choice of bandwidth (eps=NULL) in midpoint rule:
  Error in loadNamespace(name): there is no package called 'spatstat.geom'
  
  Backtrace:
       x
    1. \-surveillance:::myexpectation(...)
    2.   \-surveillance:::checksiaf(siaf, pargrid, type, ...) test-siafs.R:25:4
    3.     \-surveillance:::checksiaf.F(...)
    4.       +-base::t(...)
    5.       \-base::apply(...)
    6.         \-surveillance:::FUN(newX[, i], ...)
    7.           \-surveillance:::siaf.fallback.F(...)
    8.             +-polyCub::polyCub(...)
    9.             | \-base::eval(cl, parent.frame())
   10.             |   \-base::eval(cl, parent.frame())
   11.             \-polyCub::polyCub.midpoint(...)
   12.               \-base::tryCatch(...)
   13.                 \-base:::tryCatchList(expr, classes, parentenv, handlers)
   14.                   \-base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   15.                     \-value[[3L]](cond)
  
  [ FAIL 8 | WARN 0 | SKIP 0 | PASS 262 ]
  Error: Test failures
  Execution halted