Running 'testthat.R' [80s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(tensorflow)
  > library(greta.gp)
  Loading required package: greta
  
  Attaching package: 'greta'
  
  The following objects are masked from 'package:stats':
  
      binomial, cov2cor, poisson
  
  The following objects are masked from 'package:base':
  
      %*%, apply, backsolve, beta, chol2inv, colMeans, colSums, diag,
      eigen, forwardsolve, gamma, identity, rowMeans, rowSums, sweep,
      tapply
  
  > 
  > test_check("greta.gp")
  i Initialising python and checking dependencies, this may take a moment.
  v Initialising python and checking dependencies ... done!
  
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  running 4 chains simultaneously on up to 2 cores
  
  [ FAIL 8 | WARN 0 | SKIP 5 | PASS 52 ]
  
  ══ Skipped tests (5) ═══════════════════════════════════════════════════════════
  • On CRAN (5): 'test_gps.R:136:3', 'test_kernels.R:289:3',
    'test_kernels.R:300:3', 'test_kernels.R:312:3', 'test_kernels.R:330:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test_gps.R:69:3'): gaussian processes can be defined in models and sampled from ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:69:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:76:3'): gaussian processes can be defined in models and sampled from ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:76:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:88:3'): gaussian processes can be projected to new data ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:88:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:96:3'): gaussian processes can be projected to new data ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:96:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:102:3'): gaussian processes can be projected to new data ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:102:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:115:3'): gaussian processes can be projected with a different kernel ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:115:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:123:3'): gaussian processes can be projected with a different kernel ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:123:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  ── Failure ('test_gps.R:129:3'): gaussian processes can be projected with a different kernel ──
  `expr` threw an unexpected error.
  Message: argument "..2" is missing, with no default
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─greta.gp:::expect_ok(mcmc(m, warmup = 2, n_samples = 2)) at test_gps.R:129:3
    2. │ └─testthat::expect_error(expr, NA) at D:\RCompile\CRANpkg\local\4.4\greta.gp.Rcheck\tests\testthat\helpers.R:10:3
    3. │   └─testthat:::expect_condition_matching(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─greta::mcmc(m, warmup = 2, n_samples = 2)
    9.   └─greta:::run_samplers(...)
   10.     ├─greta (local) dispatch(...)
   11.     └─sampler$run_chain(...)
   12.       └─greta:::create_progress_bar(...)
   13.         └─glue::glue(...)
   14.           └─glue::glue_data(...)
   15.             └─base::lapply(...)
   16.               └─glue (local) FUN(X[[i]], ...)
   17.                 ├─eval(call("force", as.symbol(paste0("..", x)))) %||% .null
   18.                 ├─base::eval(call("force", as.symbol(paste0("..", x))))
   19.                 │ └─base::eval(call("force", as.symbol(paste0("..", x))))
   20.                 └─base::force(..2)
  
  [ FAIL 8 | WARN 0 | SKIP 5 | PASS 52 ]
  Error: Test failures
  Execution halted