* using log directory ‘/data/gannet/ripley/R/packages/tests-LENGTH1/aurelius.Rcheck’
* using R Under development (unstable) (2022-04-26 r82260)
* using platform: x86_64-pc-linux-gnu (64-bit)
* using session charset: UTF-8
* using option ‘--no-stop-on-test-error’
* checking for file ‘aurelius/DESCRIPTION’ ... OK
* checking extension type ... Package
* this is package ‘aurelius’ version ‘0.8.4’
* checking package namespace information ... OK
* checking package dependencies ... NOTE
Package which this enhances but not available for checking: ‘rPython’
* checking if this is a source package ... OK
* checking if there is a namespace ... OK
* checking for executable files ... OK
* checking for hidden files and directories ... OK
* checking for portable file names ... OK
* checking for sufficient/correct file permissions ... OK
* checking whether package ‘aurelius’ can be installed ... [18s/45s] OK
* checking package directory ... OK
* checking ‘build’ directory ... OK
* checking DESCRIPTION meta-information ... OK
* checking top-level files ... OK
* checking for left-over files ... OK
* checking index information ... OK
* checking package subdirectories ... OK
* checking R files for non-ASCII characters ... OK
* checking R files for syntax errors ... OK
* checking whether the package can be loaded ... OK
* checking whether the package can be loaded with stated dependencies ... OK
* checking whether the package can be unloaded cleanly ... OK
* checking whether the namespace can be loaded with stated dependencies ... OK
* checking whether the namespace can be unloaded cleanly ... OK
* checking loading without being on the library search path ... OK
* checking use of S3 registration ... OK
* checking dependencies in R code ... OK
* checking S3 generic/method consistency ... OK
* checking replacement functions ... OK
* checking foreign function calls ... OK
* checking R code for possible problems ... [29s/76s] OK
* checking Rd files ... OK
* checking Rd metadata ... OK
* checking Rd line widths ... OK
* checking Rd cross-references ... OK
* checking for missing documentation entries ... OK
* checking for code/documentation mismatches ... OK
* checking Rd \usage sections ... OK
* checking Rd contents ... OK
* checking for unstated dependencies in examples ... OK
* checking LazyData ... NOTE
  'LazyData' is specified without a 'data' directory
* checking installed files from ‘inst/doc’ ... OK
* checking files in ‘vignettes’ ... OK
* checking examples ... [31s/76s] ERROR
Running examples in ‘aurelius-Ex.R’ failed
The error most likely occurred in:

> ### Name: pfa.cv.glmnet
> ### Title: PFA Formatting of Fitted glmnet objects
> ### Aliases: pfa.cv.glmnet
> 
> ### ** Examples
> 
> X <- matrix(c(rnorm(100), runif(100)), nrow=100, ncol=2)
> Y <- factor(3 - 5 * X[,1] + 3 * X[,2] + rnorm(100, 0, 3) > 0)
> 
> model <- glmnet::cv.glmnet(X, Y, family = 'binomial')
> model_as_pfa <- pfa(model)
 ----------- FAILURE REPORT -------------- 
 --- failure: length > 1 in coercion to logical ---
 --- srcref --- 
: 
 --- package (from environment) --- 
aurelius
 --- call from context --- 
converter$apply(name, args, symbols, cells, pools, fcns, env)
 --- call from argument --- 
type == "null" || identical(type, list(type = "null"))
 --- R stacktrace ---
where 1: converter$apply(name, args, symbols, cells, pools, fcns, env)
where 2: convert_function(name, args, symbols, cells, pools, fcns, env = env)
where 3: pfa_expr(x, symbols = symbols_nested, cells = cells, pools = pools, 
    fcns = fcns, env = env)
where 4: pfa_expr_nested(args[[2]])
where 5: converter$apply(name, args, symbols, cells, pools, fcns, env)
where 6: convert_function(name, args, symbols, cells, pools, fcns, env = env)
where 7: pfa_expr(expr, symbols = actionSymbols, cells = cellsEnv, pools = poolsEnv, 
    fcns = fcnsEnv, env = env)
where 8: FUN(X[[i]], ...)
where 9: lapply(action, function(expr) pfa_expr(expr, symbols = actionSymbols, 
    cells = cellsEnv, pools = poolsEnv, fcns = fcnsEnv, env = env))
where 10: pfa_document(input = tm("Input"), output = tm("Output"), cells = this_cells, 
    action = this_action, fcns = this_fcns, name = name, version = version, 
    doc = doc, metadata = metadata, randseed = randseed, options = options, 
    ...)
where 11: pfa.glmnet(object = object$glmnet.fit, lambda = lambda, pred_type = which_pred_type, 
    cutoffs = cutoffs, name = name, version = version, doc = doc, 
    metadata = metadata, randseed = randseed, options = options, 
    ...)
where 12: pfa(object = object$glmnet.fit, lambda = lambda, pred_type = which_pred_type, 
    cutoffs = cutoffs, name = name, version = version, doc = doc, 
    metadata = metadata, randseed = randseed, options = options, 
    ...)
where 13: pfa.cv.glmnet(model)
where 14: pfa(model)

 --- value of length: 2 type: logical ---
  type values 
 FALSE  FALSE 
 --- function from context --- 
function (name, args, symbols, cells, pools, fcns, env) 
{
    pfa_expr_nested <- function(x) pfa_expr(x, symbols = as.environment(as.list(symbols)), 
        cells = cells, pools = pools, fcns = fcns, env = env)
    type = eval(args[[1]], env)
    if (!is.character(type) && is.null(names(type))) 
        list(type = type, value = args[[2]])
    else if (type == "null" || identical(type, list(type = "null"))) 
        stop("use NULL to create null values")
    else if (type == "boolean" || identical(type, list(type = "boolean"))) 
        stop("use TRUE/FALSE to create boolean values")
    else if (type == "int" || identical(type, list(type = "int"))) 
        list(int = as.numeric(args[[2]]))
    else if (type == "long" || identical(type, list(type = "long"))) 
        list(long = as.numeric(args[[2]]))
    else if (type == "float" || identical(type, list(type = "float"))) 
        list(float = as.numeric(args[[2]]))
    else if (type == "double" || identical(type, list(type = "double"))) 
        list(double = as.numeric(args[[2]]))
    else if (type == "string" || identical(type, list(type = "string"))) 
        list(string = as.character(args[[2]]))
    else if (type == "bytes" || identical(type, list(type = "bytes"))) 
        stop("bytes Base64 conversion not yet implemented")
    else if (is.character(args[[2]])) 
        list(type = type, value = unjson(args[[2]]))
    else list(type = type, new = lapply(tail(as.list(args), -1), 
        pfa_expr_nested))
}
<bytecode: 0xf572438>
<environment: namespace:aurelius>
 --- function search by body ---
 ----------- END OF FAILURE REPORT -------------- 
Fatal error: length > 1 in coercion to logical
* checking for unstated dependencies in ‘tests’ ... OK
* checking tests ...
  Running ‘testthat.R’
 [4s/11s] OK
* checking for unstated dependencies in vignettes ... OK
* checking package vignettes in ‘inst/doc’ ... OK
* checking re-building of vignette outputs ... OK
* checking PDF version of manual ... OK
* checking for non-standard things in the check directory ... OK
* checking for detritus in the temp directory ... OK
* DONE

Status: 1 ERROR, 2 NOTEs
See
  ‘/data/gannet/ripley/R/packages/tests-LENGTH1/aurelius.Rcheck/00check.log’
for details.

Command exited with non-zero status 1
Time 7:04.27, 150.07 + 13.01