Last updated on 2026-02-09 17:50:21 CET.
| Package | ERROR | OK |
|---|---|---|
| bioLeak | 2 | 7 |
| fastml | 13 | |
| genSEIR | 13 | |
| MVN | 13 | |
| PubChemR | 13 | |
| rPDBapi | 13 |
Current CRAN status: ERROR: 2, OK: 7
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
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13