Last updated on 2025-12-28 03:52:11 CET.
| Package | ERROR | OK |
|---|---|---|
| RcppGreedySetCover | 1 | 12 |
Current CRAN status: ERROR: 1, OK: 12
Version: 0.1.1
Check: examples
Result: ERROR
Running examples in 'RcppGreedySetCover-Ex.R' failed
The error most likely occurred in:
> ### Name: greedySetCover
> ### Title: Greedy Set Cover
> ### Aliases: greedySetCover
> ### Keywords: cover greedy set
>
> ### ** Examples
>
> # Create some data.
> set.seed(333)
> X <- data.table::rbindlist(
+ lapply(
+ seq_len(1e4L),
+ function(x) list(element=sample.int(n=1e3L,size=sample.int(50L,1L)))
+ ),
+ idcol="set"
+ )
> # Elements are integers 1,2,...,1000.
>
> # Run set cover
> res <- greedySetCover(X,FALSE)
Error in `[.data.table`(X, , `:=`("i0", .GRP - 1L), by = n1) :
attempt access index 2/2 in VECTOR_ELT
Calls: greedySetCover -> [ -> [.data.table
Execution halted
Flavor: r-devel-windows-x86_64
Version: 0.1.1
Check: tests
Result: ERROR
Running 'testthat.R' [1s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(RcppGreedySetCover)
>
> test_check("RcppGreedySetCover")
Saving _problems/test-greedySetCover-8.R
Saving _problems/test-greedySetCover-28.R
[ FAIL 2 | WARN 0 | SKIP 0 | PASS 1 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-greedySetCover.R:8:5'): greedySetCover returns expected coverage ──
Error in ``[.data.table`(X, , `:=`("i0", .GRP - 1L), by = n1)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. └─RcppGreedySetCover::greedySetCover(df, data.table = FALSE) at test-greedySetCover.R:8:5
2. ├─X[, `:=`("i0", .GRP - 1L), by = n1]
3. └─data.table:::`[.data.table`(X, , `:=`("i0", .GRP - 1L), by = n1)
── Error ('test-greedySetCover.R:28:5'): greedySetCover computes a valid cover when several sets are required ──
Error in ``[.data.table`(X, , `:=`("i0", .GRP - 1L), by = n1)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. └─RcppGreedySetCover::greedySetCover(df) at test-greedySetCover.R:28:5
2. ├─X[, `:=`("i0", .GRP - 1L), by = n1]
3. └─data.table:::`[.data.table`(X, , `:=`("i0", .GRP - 1L), by = n1)
[ FAIL 2 | WARN 0 | SKIP 0 | PASS 1 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-windows-x86_64
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.