• using R version 4.5.2 Patched (2026-01-31 r89382)
• using platform: aarch64-apple-darwin20
• R was compiled by     Apple clang version 16.0.0 (clang-1600.0.26.6)     GNU Fortran (GCC) 14.2.0
• running under: macOS Ventura 13.7.8
• using session charset: UTF-8
• checking for file ‘cxreg/DESCRIPTION’ ... OK
• this is package ‘cxreg’ version ‘1.1.4’
• package encoding: UTF-8
• checking package namespace information ... OK
• checking package dependencies ... OK
• 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 ‘cxreg’ can be installed ... [4s/9s] OK See the install log for details.
• used Fortran compiler: ‘GNU Fortran (GCC) 14.2.0’
• used C++ compiler: ‘Apple clang version 14.0.3 (clang-1403.0.22.14.1)’
• used SDK: ‘MacOSX11.3.1.sdk’
• checking installed package size ... 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 code files for non-ASCII characters ... OK
• checking R files for syntax errors ... OK
• checking whether the package can be loaded ... [1s/1s] OK
• checking whether the package can be loaded with stated dependencies ... [1s/1s] OK
• checking whether the package can be unloaded cleanly ... [1s/1s] OK
• checking whether the namespace can be loaded with stated dependencies ... [1s/1s] OK
• checking whether the namespace can be unloaded cleanly ... [1s/1s] OK
• checking loading without being on the library search path ... [1s/1s] 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 ... [2s/2s] OK
• checking Rd files ... [0s/0s] OK
• checking Rd metadata ... 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 contents of ‘data’ directory ... OK
• checking data for non-ASCII characters ... [0s/0s] OK
• checking data for ASCII and uncompressed saves ... OK
• checking line endings in C/C++/Fortran sources/headers ... OK
• checking compiled code ... OK
• checking usage of KIND in Fortran files ... OK
• checking sizes of PDF files under ‘inst/doc’ ... OK
• checking installed files from ‘inst/doc’ ... OK
• checking files in ‘vignettes’ ... OK
• checking examples ... [1s/1s] ERROR Running examples in ‘cxreg-Ex.R’ failed The error most likely occurred in: > ### Name: cglasso > ### Title: fit a complex-valued graphical lasso > ### Aliases: cglasso > ### Keywords: complex-valued matrix models precision > > ### ** Examples > > p <- 30 > n <- 500 > C <- diag(0.7, p) > C[row(C) == col(C) + 1] <- 0.3 > C[row(C) == col(C) - 1] <- 0.3 > Sigma <- solve(C) > set.seed(1010) > m <- floor(sqrt(n)); j <- 1 > X_t <- mvtnorm::rmvnorm(n = n, mean = rep(0, p), sigma = Sigma) > d_j <- dft.j(X_t,j,m) > f_j_hat <- t(d_j) %*% Conj(d_j) / (2*m+1) > fit <- cglasso(S=f_j_hat, m=floor(sqrt(n)))  *** caught segfault *** address 0x6, cause 'invalid permissions' Traceback:  1: eigen(Theta_hat)  2: EBIC_G_trimmed(S, Theta_hat, m, g = 0.5)  3: cglasso.path(S, D, type, m, lambda, nlambda, lambda.min.ratio, W.init, stopping_rule, stop_criterion, maxit = maxit, thresh = thresh, trace.it = trace.it)  4: cglasso(S = f_j_hat, m = floor(sqrt(n))) An irrecoverable exception occurred. R is aborting now ...
• checking for unstated dependencies in ‘tests’ ... OK
• checking tests ... [1s/1s] ERROR   Running ‘testthat.R’ [1s/1s] Running the tests in ‘tests/testthat.R’ failed. Complete output:   > library(testthat)   > library(cxreg)   >   > test_check("cxreg")       *** caught segfault ***   address 0x27, cause 'invalid permissions'      Traceback:    1: eigen(Theta_hat)    2: AIC(S, Theta_hat, m)    3: cglasso.path(S, D, type, m, lambda, nlambda, lambda.min.ratio, W.init, stopping_rule, stop_criterion, maxit = maxit, thresh = thresh, trace.it = trace.it)    4: cglasso(S = f_j_hat, m = m, nlambda = 20, stop_criterion = "AIC", stopping_rule = FALSE)    5: eval(code, test_env)    6: eval(code, test_env)    7: withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt)    8: doTryCatch(return(expr), name, parentenv, handler)    9: tryCatchOne(expr, names, parentenv, handlers[[1L]])   10: tryCatchList(expr, classes, parentenv, handlers)   11: tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal)   12: doWithOneRestart(return(expr), restart)   13: withOneRestart(expr, restarts[[1L]])   14: withRestarts(tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal), end_test = function() { })   15: test_code(code, parent.frame())   16: test_that("cglasso works", { rmvnorm_manual <- function(n, p, Sigma) { D <- chol(Sigma) return(matrix(rnorm(n * p), ncol = p) %*% D) } p <- 40 n <- 500 C <- diag(0.8, p) C[row(C) == col(C) + 1] <- -0.2 C[row(C) == col(C) - 1] <- -0.2 Sigma <- solve(C) set.seed(1234) X_t <- rmvnorm_manual(n, p, Sigma) m <- floor(sqrt(n)) j <- 1 d_j <- dft.j(X_t, j, m) f_j_hat <- t(d_j) %*% Conj(d_j)/(2 * m + 1) fit <- cglasso(S = f_j_hat, m = m, nlambda = 20, stop_criterion = "AIC", stopping_rule = FALSE) expect_length(fit$stop_arr, 20) expect_equal(fit$stop_criterion, "AIC") expect_true(is.numeric(fit$min_index)) expect_length(fit$lambda_grid, 20) expect_true(is.list(fit$Theta_list)) expect_equal(fit$type, "I") expect_true(is.matrix(fit$D))})   17: eval(code, test_env)   18: eval(code, test_env)   19: withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt)   20: doTryCatch(return(expr), name, parentenv, handler)   21: tryCatchOne(expr, names, parentenv, handlers[[1L]])   22: tryCatchList(expr, classes, parentenv, handlers)   23: tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal)   24: doWithOneRestart(return(expr), restart)   25: withOneRestart(expr, restarts[[1L]])   26: withRestarts(tryCatch(withCallingHandlers({ eval(code, test_env) new_expectations <- the$test_expectations > starting_expectations if (snapshot_skipped) { skip("On CRAN") } else if (!new_expectations && skip_on_empty) { skip_empty() }}, expectation = handle_expectation, packageNotFoundError = function(e) { if (on_cran()) { skip(paste0("{", e$package, "} is not installed.")) }}, snapshot_on_cran = function(cnd) { snapshot_skipped <<- TRUE invokeRestart("muffle_cran_snapshot")}, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error, interrupt = handle_interrupt), error = handle_fatal), end_test = function() { })   27: test_code(code = exprs, env = env, reporter = get_reporter() %||% StopReporter$new())   28: source_file(path, env = env(env), desc = desc, shuffle = shuffle, error_call = error_call)   29: FUN(X[[i]], ...)   30: lapply(test_paths, test_one_file, env = env, desc = desc, shuffle = shuffle, error_call = error_call)   31: doTryCatch(return(expr), name, parentenv, handler)   32: tryCatchOne(expr, names, parentenv, handlers[[1L]])   33: tryCatchList(expr, classes, parentenv, handlers)   34: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL})   35: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, shuffle = shuffle, error_call = error_call))   36: test_files_serial(test_dir = test_dir, test_package = test_package, test_paths = test_paths, load_helpers = load_helpers, reporter = reporter, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, desc = desc, load_package = load_package, shuffle = shuffle, error_call = error_call)   37: test_files(test_dir = path, test_paths = test_paths, test_package = package, reporter = reporter, load_helpers = load_helpers, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, load_package = load_package, parallel = parallel, shuffle = shuffle)   38: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed")   39: test_check("cxreg")   An irrecoverable exception occurred. R is aborting now ...
• checking for unstated dependencies in vignettes ... OK
• checking package vignettes ... OK
• checking re-building of vignette outputs ... [6s/6s] ERROR Error(s) in re-building vignettes: sh: line 1: 1612 Segmentation fault: 11 '/Library/Frameworks/R.framework/Resources/bin/R' --vanilla --no-echo > '/Volumes/Temp/tmp/RtmpYcpLVj/file56d3fd34a51' 2>&1 < '/Volumes/Temp/tmp/RtmpYcpLVj/file56d48b42c93' --- re-building ‘cxreg-inference.Rmd’ using rmarkdown  *** caught segfault *** address 0x4, cause 'invalid permissions' Traceback:  1: eigen(Theta_hat)  2: EBIC_G_trimmed(S, Theta_hat, m, g = 0.5)  3: cglasso.path(S, D, type, m, lambda, nlambda, lambda.min.ratio, W.init, stopping_rule, stop_criterion, maxit = maxit, thresh = thresh, trace.it = trace.it)  4: cglasso(S = fhat, m = m, type = "II")  5: eval(expr, envir)  6: eval(expr, envir)  7: withVisible(eval(expr, envir))  8: withCallingHandlers(code, error = function (e) rlang::entrace(e), message = function (cnd) { watcher$capture_plot_and_output() if (on_message$capture) { watcher$push(cnd) } if (on_message$silence) { invokeRestart("muffleMessage") }}, warning = function (cnd) { if (getOption("warn") >= 2 || getOption("warn") < 0) { return() } watcher$capture_plot_and_output() if (on_warning$capture) { cnd <- sanitize_call(cnd) watcher$push(cnd) } if (on_warning$silence) { invokeRestart("muffleWarning") }}, error = function (cnd) { watcher$capture_plot_and_output() cnd <- sanitize_call(cnd) watcher$push(cnd) switch(on_error, continue = invokeRestart("eval_continue"), stop = invokeRestart("eval_stop"), error = NULL)})  9: eval(call) 10: eval(call) 11: with_handlers({ for (expr in tle$exprs) { ev <- withVisible(eval(expr, envir)) watcher$capture_plot_and_output() watcher$print_value(ev$value, ev$visible, envir) } TRUE}, handlers) 12: doWithOneRestart(return(expr), restart) 13: withOneRestart(expr, restarts[[1L]]) 14: withRestartList(expr, restarts[-nr]) 15: doWithOneRestart(return(expr), restart) 16: withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]]) 17: withRestartList(expr, restarts) 18: withRestarts(with_handlers({ for (expr in tle$exprs) { ev <- withVisible(eval(expr, envir)) watcher$capture_plot_and_output() watcher$print_value(ev$value, ev$visible, envir) } TRUE}, handlers), eval_continue = function() TRUE, eval_stop = function() FALSE) 19: evaluate::evaluate(...) 20: evaluate(code, envir = env, new_device = FALSE, keep_warning = if (is.numeric(options$warning)) TRUE else options$warning, keep_message = if (is.numeric(options$message)) TRUE else 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)) 21: in_dir(input_dir(), expr) 22: in_input_dir(evaluate(code, envir = env, new_device = FALSE, keep_warning = if (is.numeric(options$warning)) TRUE else options$warning, keep_message = if (is.numeric(options$message)) TRUE else 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(group) 27: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { if (progress && is.function(pb$interrupt)) pb$interrupt() if (is_R_CMD_build() || is_R_CMD_check()) error <<- format(e) }) 28: with_options(withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { if (progress && is.function(pb$interrupt)) pb$interrupt() if (is_R_CMD_build() || is_R_CMD_check()) error <<- format(e) }), list(rlang_trace_top_env = knit_global())) 29: xfun:::handle_error(with_options(withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { if (progress && is.function(pb$interrupt)) pb$interrupt() if (is_R_CMD_build() || is_R_CMD_check()) error <<- format(e) }), list(rlang_trace_top_env = knit_global())), function(loc) { setwd(wd) write_utf8(res, output %n% stdout()) paste0("\nQuitting from ", loc, if (!is.null(error)) paste0("\n", rule(), error, "\n", rule()))}, if (labels[i] != "") sprintf(" [%s]", labels[i]), get_loc) 30: process_file(text, output) 31: knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet) 32: rmarkdown::render(file, encoding = encoding, quiet = quiet, envir = globalenv(), output_dir = getwd(), ...) 33: vweave_rmarkdown(...) 34: engine$weave(file, quiet = quiet, encoding = enc) 35: doTryCatch(return(expr), name, parentenv, handler) 36: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 37: tryCatchList(expr, classes, parentenv, handlers) 38: 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) }}, error = function(e) { OK <<- FALSE message(gettextf("Error: processing vignette '%s' failed with diagnostics:\n%s", file, conditionMessage(e)))}) 39: tools:::.buildOneVignette("cxreg-inference.Rmd", "/Volumes/Builds/packages/big-sur-arm64/results/4.5/cxreg.Rcheck/vign_test/cxreg", TRUE, FALSE, "cxreg-inference", "UTF-8", "/Volumes/Temp/tmp/RtmpYcpLVj/file56d6726345.rds") An irrecoverable exception occurred. R is aborting now ... sh: line 1: 1642 Segmentation fault: 11 '/Library/Frameworks/R.framework/Resources/bin/R' --vanilla --no-echo > '/Volumes/Temp/tmp/RtmpYcpLVj/file56d402978aa' 2>&1 < '/Volumes/Temp/tmp/RtmpYcpLVj/file56d62b101ce' --- re-building ‘cxreg.Rmd’ using rmarkdown  *** caught segfault *** address 0x6, cause 'invalid permissions' Traceback:  1: eigen(Theta_hat)  2: EBIC_G_trimmed(S, Theta_hat, m, g = 0.5)  3: cglasso.path(S, D, type, m, lambda, nlambda, lambda.min.ratio, W.init, stopping_rule, stop_criterion, maxit = maxit, thresh = thresh, trace.it = trace.it)  4: cglasso(S = f_hat, m = m, type = "I")  5: eval(expr, envir)  6: eval(expr, envir)  7: withVisible(eval(expr, envir))  8: withCallingHandlers(code, error = function (e) rlang::entrace(e), message = function (cnd) { watcher$capture_plot_and_output() if (on_message$capture) { watcher$push(cnd) } if (on_message$silence) { invokeRestart("muffleMessage") }}, warning = function (cnd) { if (getOption("warn") >= 2 || getOption("warn") < 0) { return() } watcher$capture_plot_and_output() if (on_warning$capture) { cnd <- sanitize_call(cnd) watcher$push(cnd) } if (on_warning$silence) { invokeRestart("muffleWarning") }}, error = function (cnd) { watcher$capture_plot_and_output() cnd <- sanitize_call(cnd) watcher$push(cnd) switch(on_error, continue = invokeRestart("eval_continue"), stop = invokeRestart("eval_stop"), error = NULL)})  9: eval(call) 10: eval(call) 11: with_handlers({ for (expr in tle$exprs) { ev <- withVisible(eval(expr, envir)) watcher$capture_plot_and_output() watcher$print_value(ev$value, ev$visible, envir) } TRUE}, handlers) 12: doWithOneRestart(return(expr), restart) 13: withOneRestart(expr, restarts[[1L]]) 14: withRestartList(expr, restarts[-nr]) 15: doWithOneRestart(return(expr), restart) 16: withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]]) 17: withRestartList(expr, restarts) 18: withRestarts(with_handlers({ for (expr in tle$exprs) { ev <- withVisible(eval(expr, envir)) watcher$capture_plot_and_output() watcher$print_value(ev$value, ev$visible, envir) } TRUE}, handlers), eval_continue = function() TRUE, eval_stop = function() FALSE) 19: evaluate::evaluate(...) 20: evaluate(code, envir = env, new_device = FALSE, keep_warning = if (is.numeric(options$warning)) TRUE else options$warning, keep_message = if (is.numeric(options$message)) TRUE else 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)) 21: in_dir(input_dir(), expr) 22: in_input_dir(evaluate(code, envir = env, new_device = FALSE, keep_warning = if (is.numeric(options$warning)) TRUE else options$warning, keep_message = if (is.numeric(options$message)) TRUE else 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(group) 27: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { if (progress && is.function(pb$interrupt)) pb$interrupt() if (is_R_CMD_build() || is_R_CMD_check()) error <<- format(e) }) 28: with_options(withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { if (progress && is.function(pb$interrupt)) pb$interrupt() if (is_R_CMD_build() || is_R_CMD_check()) error <<- format(e) }), list(rlang_trace_top_env = knit_global())) 29: xfun:::handle_error(with_options(withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { if (progress && is.function(pb$interrupt)) pb$interrupt() if (is_R_CMD_build() || is_R_CMD_check()) error <<- format(e) }), list(rlang_trace_top_env = knit_global())), function(loc) { setwd(wd) write_utf8(res, output %n% stdout()) paste0("\nQuitting from ", loc, if (!is.null(error)) paste0("\n", rule(), error, "\n", rule()))}, if (labels[i] != "") sprintf(" [%s]", labels[i]), get_loc) 30: process_file(text, output) 31: knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet) 32: rmarkdown::render(file, encoding = encoding, quiet = quiet, envir = globalenv(), output_dir = getwd(), ...) 33: vweave_rmarkdown(...) 34: engine$weave(file, quiet = quiet, encoding = enc) 35: doTryCatch(return(expr), name, parentenv, handler) 36: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 37: tryCatchList(expr, classes, parentenv, handlers) 38: 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) }}, error = function(e) { OK <<- FALSE message(gettextf("Error: processing vignette '%s' failed with diagnostics:\n%s", file, conditionMessage(e)))}) 39: tools:::.buildOneVignette("cxreg.Rmd", "/Volumes/Builds/packages/big-sur-arm64/results/4.5/cxreg.Rcheck/vign_test/cxreg", TRUE, FALSE, "cxreg", "UTF-8", "/Volumes/Temp/tmp/RtmpYcpLVj/file56d2cda8c2f.rds") An irrecoverable exception occurred. R is aborting now ... SUMMARY: processing the following files failed:   ‘cxreg-inference.Rmd’ ‘cxreg.Rmd’ Error: Vignette re-building failed. Execution halted
• checking PDF version of manual ... [3s/3s] OK
• DONE

Status: 3 ERRORs