The hardware and bandwidth for this mirror is donated by dogado GmbH, the Webhosting and Full Service-Cloud Provider. Check out our Wordpress Tutorial.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]dogado.de.
Last updated on 2026-07-12 17:51:58 CEST.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.1.2 | 15.61 | 123.16 | 138.77 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.1.2 | 7.92 | 90.18 | 98.10 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.1.4 | 21.00 | 205.53 | 226.53 | OK | |
| r-devel-linux-x86_64-fedora-gcc | 1.1.4 | 24.00 | 236.25 | 260.25 | OK | |
| r-devel-windows-x86_64 | 1.1.4 | 21.00 | 189.00 | 210.00 | OK | |
| r-patched-linux-x86_64 | 1.1.2 | 13.91 | 116.05 | 129.96 | OK | |
| r-release-linux-x86_64 | 1.1.2 | 13.34 | 115.42 | 128.76 | OK | |
| r-release-macos-arm64 | 1.1.4 | 4.00 | 43.00 | 47.00 | OK | |
| r-release-macos-x86_64 | 1.1.4 | 12.00 | 228.00 | 240.00 | OK | |
| r-release-windows-x86_64 | 1.1.2 | 24.00 | 189.00 | 213.00 | OK | |
| r-oldrel-macos-arm64 | 1.1.4 | 4.00 | 41.00 | 45.00 | ERROR | |
| r-oldrel-macos-x86_64 | 1.1.4 | 11.00 | 137.00 | 148.00 | OK | |
| r-oldrel-windows-x86_64 | 1.1.2 | 24.00 | 194.00 | 218.00 | OK |
Version: 1.1.4
Check: examples
Result: 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 ...
Flavor: r-oldrel-macos-arm64
Version: 1.1.4
Check: tests
Result: 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 ...
Flavor: r-oldrel-macos-arm64
Version: 1.1.4
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
sh: line 1: 10195 Segmentation fault: 11 '/Library/Frameworks/R.framework/Resources/bin/R' --vanilla --no-echo > '/Volumes/Temp/tmp/RtmpXfCPu6/file274c6568b437' 2>&1 < '/Volumes/Temp/tmp/RtmpXfCPu6/file274c3d0fbae4'
--- 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/RtmpXfCPu6/file274c5acd6fd3.rds")
An irrecoverable exception occurred. R is aborting now ...
sh: line 1: 10219 Segmentation fault: 11 '/Library/Frameworks/R.framework/Resources/bin/R' --vanilla --no-echo > '/Volumes/Temp/tmp/RtmpXfCPu6/file274cec6c26b' 2>&1 < '/Volumes/Temp/tmp/RtmpXfCPu6/file274c1b060661'
--- 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/RtmpXfCPu6/file274c53b6ee0d.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
Flavor: r-oldrel-macos-arm64
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.
Health stats visible at Monitor.