CRAN Package Check Results for Package ctsemOMX

Last updated on 2021-10-16 09:54:14 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.0.4 28.91 747.58 776.49 OK
r-devel-linux-x86_64-debian-gcc 1.0.4 20.70 501.02 521.72 OK
r-devel-linux-x86_64-fedora-clang 1.0.4 859.39 OK
r-devel-linux-x86_64-fedora-gcc 1.0.4 818.25 OK
r-devel-windows-x86_64 1.0.4 38.00 220.00 258.00 OK --no-vignettes
r-devel-windows-x86_64-gcc10-UCRT 1.0.4 OK
r-patched-linux-x86_64 1.0.4 31.09 669.86 700.95 OK
r-patched-solaris-x86 1.0.4 420.90 ERROR
r-release-linux-x86_64 1.0.4 23.54 663.68 687.22 OK
r-release-macos-arm64 1.0.4 OK
r-release-macos-x86_64 1.0.4 OK
r-release-windows-ix86+x86_64 1.0.4 63.00 293.00 356.00 OK --no-vignettes
r-oldrel-macos-x86_64 1.0.4 OK
r-oldrel-windows-ix86+x86_64 1.0.4 62.00 275.00 337.00 OK --no-vignettes

Check Details

Version: 1.0.4
Check: examples
Result: ERROR
    Running examples in ‘ctsemOMX-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: ctGenerateFromFit
    > ### Title: Generates data according to the model estimated in a ctsemFit
    > ### object.
    > ### Aliases: ctGenerateFromFit
    >
    > ### ** Examples
    >
    >
    > data(AnomAuth)
    > AnomAuthmodel <- ctModel(LAMBDA = matrix(c(1, 0, 0, 1), nrow = 2, ncol = 2),
    + Tpoints = 5, n.latent = 2, n.manifest = 2, MANIFESTVAR=diag(0, 2))
    Type "omx" is still supported but requires ctsemOMX package installation. "stanct" or "standt" are recommended types.
    > AnomAuthfit <- ctFit(AnomAuth, AnomAuthmodel)
    wide format data detected
    Running ctsemCarefulFit with 14 parameters
    Running ctsem with 14 parameters
    
    Beginning initial fit attempt
    Running ctsem with 14 parameters
    Error: C stack usage 331650196 is too close to the limit
    
     Fit attempt generated errors
    
    Beginning fit attempt 1 of at maximum 5 extra tries
    Running ctsem with 14 parameters
    terminate called after throwing an instance of 'std::runtime_error'
     what(): std::bad_alloc
Flavor: r-patched-solaris-x86

Version: 1.0.4
Check: tests
Result: ERROR
     Running ‘testthat.R’ [21s/60s]
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library(testthat)
     > library(ctsemOMX)
     Loading required package: ctsem
     Loading required package: Rcpp
     ctsem also changes in time, for manual run ctDocs(), for blog see https://cdriver.netlify.app/, for citation info run citation('ctsem'), for original OpenMx functionality install.packages('ctsemOMX'), and for discussion https://github.com/cdriveraus/ctsem/discussions
     Loading required package: OpenMx
     To take full advantage of multiple cores, use:
     mxOption(key='Number of Threads', value=parallel::detectCores()) #now
     Sys.setenv(OMP_NUM_THREADS=parallel::detectCores()) #before library(OpenMx)
    
     Attaching package: 'ctsemOMX'
    
     The following objects are masked from 'package:ctsem':
    
     ctFit, ctIndplot
    
     > pdf(NULL)
     > test_check("ctsemOMX")
     terminate called after throwing an instance of 'std::runtime_error'
     what(): Element-wise '+' not conformable: 'ctsem.discreteDIFFUSIONwithdummy[1]' is 4x2 and 'ctsem.discreteDIFFUSIONwithdummy[2]' is 2x2
     ctsem.discreteDIFFUSIONwithdummy[1] = matrix(c( # 4x2
     0, 0
     , 0, 0
     , 0, 0
     , 0, 0), byrow=TRUE, nrow=4, ncol=2)
     ctsem.discreteDIFFUSIONwithdummy[2] = matrix(c( # 2x2
     0, 0
     , 0, 0), byrow=TRUE, nrow=2, ncol=2)
Flavor: r-patched-solaris-x86

Version: 1.0.4
Check: re-building of vignette outputs
Result: WARN
    Error(s) in re-building vignettes:
     ...
    --- re-building ‘ctsem.rnw’ using knitr
    Observations with missing time information found - removing 1 rows
    Discrete time points created: 4
    Extracting first non-missing value for time independent predictors
    imputedefs==FALSE (default, recommended) so setting observations with no time value to NA
    Type "omx" is still supported but requires ctsemOMX package installation. "stanct" or "standt" are recommended types.
    Type "omx" is still supported but requires ctsemOMX package installation. "stanct" or "standt" are recommended types.
    wide format data detected
    Running ctsemCarefulFit with 16 parameters
    Error: C stack usage 350524564 is too close to the limit
    Running ctsem with 16 parameters
    
    Beginning initial fit attempt
    Running ctsem with 16 parameters
    
     *** caught segfault ***
    address 6115abb0, cause 'memory not mapped'
    
    Traceback:
     1: runHelper(model, frontendStart, intervals, silent, suppressWarnings, unsafe, checkpoint, useSocket, onlyFrontend, useOptimizer, beginMessage)
     2: mxRun(model = model, suppressWarnings = T, unsafe = T, silent = T, intervals = intervals, beginMessage = T)
     3: runWithCounter(model, numdone, silent, intervals = F)
     4: doTryCatch(return(expr), name, parentenv, handler)
     5: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     6: tryCatchList(expr, classes, parentenv, handlers)
     7: tryCatch(expr, error = function(e) { call <- conditionCall(e) if (!is.null(call)) { if (identical(call[[1L]], quote(doTryCatch))) call <- sys.call(-4L) dcall <- deparse(call, nlines = 1L) prefix <- paste("Error in", dcall, ": ") LONG <- 75L sm <- strsplit(conditionMessage(e), "\n")[[1L]] w <- 14L + nchar(dcall, type = "w") + nchar(sm[1L], type = "w") if (is.na(w)) w <- 14L + nchar(dcall, type = "b") + nchar(sm[1L], type = "b") if (w > LONG) prefix <- paste0(prefix, "\n ") } else prefix <- "Error : " msg <- paste0(prefix, conditionMessage(e), "\n") .Internal(seterrmessage(msg[1L])) if (!silent && isTRUE(getOption("show.error.messages"))) { cat(msg, file = outFile) .Internal(printDeferredWarnings()) } invisible(structure(msg, class = "try-error", condition = e))})
     8: try(runWithCounter(model, numdone, silent, intervals = F))
     9: withCallingHandlers(expr, warning = function(w) if (inherits(w, classes)) tryInvokeRestart("muffleWarning"))
    10: suppressWarnings(try(runWithCounter(model, numdone, silent, intervals = F)))
    11: mxTryHard(model, initialTolerance = 0.00000000000001, initialGradientIterations = 1, showInits = showInits, checkHess = TRUE, greenOK = FALSE, iterationSummary = iterationSummary, bestInitsOutput = FALSE, verbose = verbose, extraTries = retryattempts, loc = 0.5, scale = 0.2, paste = FALSE)
    12: ctFit(dat = ctExample1, ctmodelobj = example1model)
    13: eval(expr, envir, enclos)
    14: eval(expr, envir, enclos)
    15: withVisible(eval(expr, envir, enclos))
    16: withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler, error = eHandler, message = mHandler)
    17: handle(ev <- withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler, error = eHandler, message = mHandler))
    18: timing_fn(handle(ev <- withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler, error = eHandler, message = mHandler)))
    19: evaluate_call(expr, parsed$src[[i]], envir = envir, enclos = enclos, debug = debug, last = i == length(out), use_try = stop_on_error != 2L, keep_warning = keep_warning, keep_message = keep_message, output_handler = output_handler, include_timing = include_timing)
    20: evaluate::evaluate(...)
    21: evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message), stop_on_error = if (is.numeric(options$error)) options$error else { if (options$error && options$include) 0L else 2L }, output_handler = knit_handlers(options$render, options))
    22: in_dir(input_dir(), evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message), stop_on_error = if (is.numeric(options$error)) options$error else { if (options$error && options$include) 0L else 2L }, output_handler = knit_handlers(options$render, options)))
    23: eng_r(options)
    24: block_exec(params)
    25: call_block(x)
    26: process_group.block(group)
    27: process_group(group)
    28: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { setwd(wd) cat(res, sep = "\n", file = output %n% "") message("Quitting from lines ", paste(current_lines(i), collapse = "-"), " (", knit_concord$get("infile"), ") ") })
    29: process_file(text, output)
    30: (if (grepl("\\.[Rr]md$", file)) knit2html else if (grepl("\\.[Rr]rst$", file)) knit2pandoc else knit)(file, encoding = encoding, quiet = quiet, envir = globalenv(), ...)
    31: engine$weave(file, quiet = quiet, encoding = enc)
    32: doTryCatch(return(expr), name, parentenv, handler)
    33: tryCatchOne(expr, names, parentenv, handlers[[1L]])
    34: tryCatchList(expr, classes, parentenv, handlers)
    35: tryCatch({ engine$weave(file, quiet = quiet, encoding = enc) setwd(startdir) output <- find_vignette_product(name, by = "weave", engine = engine) if (!have.makefile && vignette_is_tex(output)) { texi2pdf(file = output, clean = FALSE, quiet = quiet) output <- find_vignette_product(name, by = "texi2pdf", engine = engine) } outputs <- c(outputs, output)}, error = function(e) { thisOK <<- FALSE fails <<- c(fails, file) message(gettextf("Error: processing vignette '%s' failed with diagnostics:\n%s", file, conditionMessage(e)))})
    36: tools:::buildVignettes(dir = "/home/ripley/R/packages/tests32/ctsemOMX.Rcheck/vign_test/ctsemOMX", ser_elibs = "/tmp/Rtmp1saOMW/file613579ab4f4e.rds")
    An irrecoverable exception occurred. R is aborting now ...
Flavor: r-patched-solaris-x86

Version: 1.0.4
Check: for non-standard things in the check directory
Result: NOTE
    Found the following files/directories:
     ‘core’
Flavor: r-patched-solaris-x86