Last updated on 2026-02-08 01:50:22 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-gcc | 0.1.0 | 7.12 | 122.60 | 129.72 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 0.1.0 | 20.00 | 230.28 | 250.28 | OK | |
| r-devel-linux-x86_64-fedora-gcc | 0.1.0 | 19.00 | 298.50 | 317.50 | OK | |
| r-devel-windows-x86_64 | 0.1.0 | 15.00 | 201.00 | 216.00 | OK | |
| r-release-linux-x86_64 | 0.1.0 | 10.03 | 168.02 | 178.05 | ERROR | |
| r-release-macos-arm64 | 0.1.0 | 2.00 | 46.00 | 48.00 | OK | |
| r-release-macos-x86_64 | 0.1.0 | 8.00 | 338.00 | 346.00 | OK | |
| r-oldrel-macos-arm64 | 0.1.0 | 2.00 | 51.00 | 53.00 | OK | |
| r-oldrel-macos-x86_64 | 0.1.0 | 8.00 | 275.00 | 283.00 | OK |
Version: 0.1.0
Check: examples
Result: ERROR
Running examples in ‘bioLeak-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: audit_report
> ### Title: Render an HTML audit report
> ### Aliases: audit_report
>
> ### ** Examples
>
> set.seed(1)
> df <- data.frame(
+ subject = rep(1:6, each = 2),
+ outcome = factor(rep(c(0, 1), 6)),
+ x1 = rnorm(12),
+ x2 = rnorm(12)
+ )
>
> splits <- make_split_plan(df, outcome = "outcome",
+ mode = "subject_grouped", group = "subject",
+ v = 3, progress = FALSE)
>
> custom <- list(
+ glm = list(
+ fit = function(x, y, task, weights, ...) {
+ stats::glm(y ~ ., data = data.frame(y = y, x),
+ family = stats::binomial(), weights = weights)
+ },
+ predict = function(object, newdata, task, ...) {
+ as.numeric(stats::predict(object,
+ newdata = as.data.frame(newdata),
+ type = "response"))
+ }
+ )
+ )
>
> fit <- fit_resample(df, outcome = "outcome", splits = splits,
+ learner = "glm", custom_learners = custom,
+ metrics = "auc", refit = FALSE, seed = 1)
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
>
> audit <- audit_leakage(fit, metric = "auc", B = 5, perm_stratify = FALSE)
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
|
| | 0%
|
|======================= | 33%
|
|=============================================== | 67%
|
|======================================================================| 100%
>
> if (requireNamespace("rmarkdown", quietly = TRUE) &&
+ requireNamespace("ggplot2", quietly = TRUE)) {
+ out_file <- audit_report(audit, output_dir = tempdir(), quiet = TRUE)
+ out_file
+ }
Warning in file(con, "w") :
cannot open file 'audit_report.knit.md': Read-only file system
Error in file(con, "w") : cannot open the connection
Calls: audit_report ... <Anonymous> -> <Anonymous> -> write_utf8 -> writeLines -> file
Execution halted
Flavors: r-devel-linux-x86_64-debian-gcc, r-release-linux-x86_64