Last updated on 2026-02-20 20:51:04 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-gcc | 1.2.6 | 110.57 | 33.88 | 144.45 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 1.2.6 | 429.00 | 124.63 | 553.63 | OK | |
| r-devel-linux-x86_64-fedora-gcc | 1.2.6 | 343.00 | 64.78 | 407.78 | ERROR | |
| r-devel-macos-arm64 | 1.2.6 | 10.00 | -3.00 | 7.00 | ERROR | |
| r-release-macos-arm64 | 1.2.6 | 8.00 | -1.00 | 7.00 | ERROR | |
| r-release-windows-x86_64 | 1.2.6 | 190.00 | 141.00 | 331.00 | OK | |
| r-oldrel-macos-arm64 | 1.2.6 | 8.00 | 3.00 | 11.00 | ERROR | |
| r-oldrel-windows-x86_64 | 1.2.6 | 186.00 | 154.00 | 340.00 | OK |
Version: 1.2.6
Check: examples
Result: ERROR
Running examples in ‘poLCAParallel-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: cheating
> ### Title: GPA and chronic cheating (sample data)
> ### Aliases: cheating
> ### Keywords: datasets
>
> ### ** Examples
>
> ##
> ## Replication of latent class models in Dayton (1998)
> ##
> ## Example 1. Two-class LCA. (Table 3.3, p. 32)
> ##
> data(cheating)
> f <- cbind(LIEEXAM,LIEPAPER,FRAUD,COPYEXAM)~1
> ch2 <- poLCA(f,cheating,nclass=2) # log-likelihood: -440.0271
Conditional item response (column) probabilities,
by outcome variable, for each class (row)
$LIEEXAM
Pr(1) Pr(2)
class 1: 0.4231 0.5769
class 2: 0.9834 0.0166
$LIEPAPER
Pr(1) Pr(2)
class 1: 0.4109 0.5891
class 2: 0.9708 0.0292
$FRAUD
Pr(1) Pr(2)
class 1: 0.7840 0.2160
class 2: 0.9629 0.0371
$COPYEXAM
Pr(1) Pr(2)
class 1: 0.6236 0.3764
class 2: 0.8181 0.1819
Estimated class population shares
0.1606 0.8394
Predicted class memberships (by modal posterior prob.)
0.1693 0.8307
=========================================================
Fit for 2 latent classes:
=========================================================
number of observations: 319
number of estimated parameters: 9
residual degrees of freedom: 6
maximum log-likelihood: -440.0271
AIC(2): 898.0542
BIC(2): 931.9409
G^2(2): 7.764242 (Likelihood ratio/deviance statistic)
X^2(2): 8.323404 (Chi-square goodness of fit)
>
> ##
> ## Example 2. Two-class latent class regression using
> ## GPA as a covariate to predict class membership as
> ## "cheaters" vs. "non-cheaters".
> ## (Table 7.1, p. 85, and Figure 7.1, p. 86)
> ##
> f2 <- cbind(LIEEXAM,LIEPAPER,FRAUD,COPYEXAM)~GPA
> ch2c <- poLCA(f2,cheating,nclass=2) # log-likelihood: -429.6384
*** caught segfault ***
address (nil), cause 'memory not mapped'
Traceback:
1: EmAlgorithmRcpp(features, t(responses), probs.start$vector, ndata, nfeature, noutcomes, nclass, nrep, na.rm, n.thread, maxiter, tol, seed)
2: poLCA(f2, cheating, nclass = 2)
An irrecoverable exception occurred. R is aborting now ...
Segmentation fault
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.2.6
Check: tests
Result: ERROR
Running ‘testthat.R’ [6s/7s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
>
> test_check("poLCAParallel")
Loading required package: poLCAParallel
*** caught segfault ***
address (nil), cause 'memory not mapped'
Traceback:
1: EmAlgorithmRcpp(features, t(responses), probs.start$vector, ndata, nfeature, noutcomes, nclass, nrep, na.rm, n.thread, maxiter, tol, seed)
2: poLCAParallel::poLCA(formula, data, n_cluster, maxiter = maxiter, tol = tol, na.rm = na_rm, nrep = n_rep, verbose = FALSE, n.thread = n_thread)
3: test_regression(100, 4, c(2, 3, 5, 2, 2), 3, 4, TRUE, N_THREAD, DEFAULT_MAXITER, DEFAULT_TOL, 0)
4: eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
5: withCallingHandlers(code, condition = function(cnd) { if (!is.null(first_match) || !matcher(cnd)) { return() } first_match <<- cnd cnd_muffle(cnd) if (inherits(cnd, "error")) { invokeRestart("done") }})
6: doWithOneRestart(return(expr), restart)
7: withOneRestart(expr, restarts[[1L]])
8: withRestarts(withCallingHandlers(code, condition = function(cnd) { if (!is.null(first_match) || !matcher(cnd)) { return() } first_match <<- cnd cnd_muffle(cnd) if (inherits(cnd, "error")) { invokeRestart("done") }}), done = function() {})
9: .capture(act$val <- eval_bare(quo_get_expr(.quo), quo_get_env(.quo)), ...)
10: quasi_capture(enquo(object), NULL, capture)
11: expect_no_("error", { { object }}, regexp = message, class = class)
12: expect_no_error(test_regression(100, 4, c(2, 3, 5, 2, 2), 3, 4, TRUE, N_THREAD, DEFAULT_MAXITER, DEFAULT_TOL, 0))
13: eval(code, test_env)
14: eval(code, test_env)
15: 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)
16: doTryCatch(return(expr), name, parentenv, handler)
17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
18: tryCatchList(expr, classes, parentenv, handlers)
19: 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)
20: doWithOneRestart(return(expr), restart)
21: withOneRestart(expr, restarts[[1L]])
22: 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() { })
23: test_code(code, parent.frame())
24: test_that("regression-full-data", { set.seed(-590845051) seeds <- sample.int(.Machine$integer.max, N_REPEAT) for (i in seq_len(N_REPEAT)) { set.seed(seeds[i]) expect_no_error(test_regression(100, 4, c(2, 3, 5, 2, 2), 3, 4, TRUE, N_THREAD, DEFAULT_MAXITER, DEFAULT_TOL, 0)) } set.seed(1785517768) seeds <- sample.int(.Machine$integer.max, N_REPEAT) for (i in seq_len(N_REPEAT)) { set.seed(seeds[i]) expect_no_error(test_regression(100, 4, c(2, 3, 5, 2, 2), 3, 4, FALSE, N_THREAD, DEFAULT_MAXITER, DEFAULT_TOL, 0)) }})
25: eval(code, test_env)
26: eval(code, test_env)
27: 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)
28: doTryCatch(return(expr), name, parentenv, handler)
29: tryCatchOne(expr, names, parentenv, handlers[[1L]])
30: tryCatchList(expr, classes, parentenv, handlers)
31: 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)
32: doWithOneRestart(return(expr), restart)
33: withOneRestart(expr, restarts[[1L]])
34: 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() { })
35: test_code(code = exprs, env = env, reporter = get_reporter() %||% StopReporter$new())
36: source_file(path, env = env(env), desc = desc, shuffle = shuffle, error_call = error_call)
37: FUN(X[[i]], ...)
38: lapply(test_paths, test_one_file, env = env, desc = desc, shuffle = shuffle, error_call = error_call)
39: doTryCatch(return(expr), name, parentenv, handler)
40: tryCatchOne(expr, names, parentenv, handlers[[1L]])
41: tryCatchList(expr, classes, parentenv, handlers)
42: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL})
43: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, shuffle = shuffle, error_call = error_call))
44: 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)
45: 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)
46: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed")
47: test_check("poLCAParallel")
An irrecoverable exception occurred. R is aborting now ...
Segmentation fault
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.2.6
Check: examples
Result: ERROR
Running examples in ‘poLCAParallel-Ex.R’ failed
The error most likely occurred in:
> ### Name: cheating
> ### Title: GPA and chronic cheating (sample data)
> ### Aliases: cheating
> ### Keywords: datasets
>
> ### ** Examples
>
> ##
> ## Replication of latent class models in Dayton (1998)
> ##
> ## Example 1. Two-class LCA. (Table 3.3, p. 32)
> ##
> data(cheating)
> f <- cbind(LIEEXAM,LIEPAPER,FRAUD,COPYEXAM)~1
> ch2 <- poLCA(f,cheating,nclass=2) # log-likelihood: -440.0271
Conditional item response (column) probabilities,
by outcome variable, for each class (row)
$LIEEXAM
Pr(1) Pr(2)
class 1: 0.4231 0.5769
class 2: 0.9834 0.0166
$LIEPAPER
Pr(1) Pr(2)
class 1: 0.4109 0.5891
class 2: 0.9708 0.0292
$FRAUD
Pr(1) Pr(2)
class 1: 0.7840 0.2160
class 2: 0.9629 0.0371
$COPYEXAM
Pr(1) Pr(2)
class 1: 0.6236 0.3764
class 2: 0.8181 0.1819
Estimated class population shares
0.1606 0.8394
Predicted class memberships (by modal posterior prob.)
0.1693 0.8307
=========================================================
Fit for 2 latent classes:
=========================================================
number of observations: 319
number of estimated parameters: 9
residual degrees of freedom: 6
maximum log-likelihood: -440.0271
AIC(2): 898.0542
BIC(2): 931.9409
G^2(2): 7.764242 (Likelihood ratio/deviance statistic)
X^2(2): 8.323404 (Chi-square goodness of fit)
>
> ##
> ## Example 2. Two-class latent class regression using
> ## GPA as a covariate to predict class membership as
> ## "cheaters" vs. "non-cheaters".
> ## (Table 7.1, p. 85, and Figure 7.1, p. 86)
> ##
> f2 <- cbind(LIEEXAM,LIEPAPER,FRAUD,COPYEXAM)~GPA
> ch2c <- poLCA(f2,cheating,nclass=2) # log-likelihood: -429.6384
*** caught segfault ***
address (nil), cause 'memory not mapped'
Traceback:
1: EmAlgorithmRcpp(features, t(responses), probs.start$vector, ndata, nfeature, noutcomes, nclass, nrep, na.rm, n.thread, maxiter, tol, seed)
2: poLCA(f2, cheating, nclass = 2)
An irrecoverable exception occurred. R is aborting now ...
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.2.6
Check: tests
Result: ERROR
Running ‘testthat.R’ [14s/18s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
>
> test_check("poLCAParallel")
Loading required package: poLCAParallel
*** caught segfault ***
address (nil), cause 'memory not mapped'
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.2.6
Check: whether package can be installed
Result: ERROR
Installation failed.
Flavors: r-devel-macos-arm64, r-release-macos-arm64, r-oldrel-macos-arm64