CRAN Package Check Results for Package abind

Last updated on 2024-03-29 01:50:58 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.4-5 2.92 29.03 31.95 OK
r-devel-linux-x86_64-debian-gcc 1.4-5 1.94 22.00 23.94 OK
r-devel-linux-x86_64-fedora-clang 1.4-5 40.89 OK
r-devel-linux-x86_64-fedora-gcc 1.4-5 38.65 OK
r-devel-windows-x86_64 1.4-5 4.00 381.00 385.00 ERROR
r-patched-linux-x86_64 1.4-5 2.62 28.49 31.11 OK
r-release-linux-x86_64 1.4-5 2.29 28.48 30.77 OK
r-release-macos-arm64 1.4-5 19.00 OK
r-release-macos-x86_64 1.4-5 27.00 OK
r-release-windows-x86_64 1.4-5 4.00 46.00 50.00 OK
r-oldrel-macos-arm64 1.4-5 16.00 OK
r-oldrel-windows-x86_64 1.4-5 5.00 53.00 58.00 OK

Check Details

Version: 1.4-5
Check: tests
Result: ERROR Running 'abind.R' [0s] Comparing 'abind.Rout' to 'abind.Rout.save' ... OK Running 'adrop.R' [0s] Comparing 'adrop.Rout' to 'adrop.Rout.save' ... OK Running 'afill.R' [0s] Comparing 'afill.Rout' to 'afill.Rout.save' ...143c143 < Error in `afill<-.default`(`*tmp*`, value = -1:-6) : --- > Error in `afill<-.default`(`*tmp*`, value = c(-1L, -2L, -3L, -4L, -5L, : Running 'asub.R' [170s] Running 'dnns.R' [169s] Running the tests in 'tests/asub.R' failed. Complete output: > library(abind) > x <- array(1:24,dim=c(2,3,4),dimnames=list(letters[1:2],LETTERS[1:3],letters[23:26])) > dimnames(x) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1, 1)) [[1]] [1] "A" "B" "C" [[2]] [1] "w" "x" "y" "z" > # example using y to check that we're getting the right 'x' in the eval inside asub() > y <- array(1:24,dim=c(2,3,4),dimnames=list(LETTERS[1:2],letters[1:3],LETTERS[23:26])) > dimnames(asub(y, 1, 1, drop=TRUE)) [[1]] [1] "a" "b" "c" [[2]] [1] "W" "X" "Y" "Z" > dimnames(asub(x, 1, 1, drop=FALSE)) [[1]] [1] "a" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1, 2)) [[1]] [1] "a" "b" [[2]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1, 2, drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1, 2, drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1, 3)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" > dimnames(asub(x, 1, 3, drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" > dimnames(asub(x, 1, 3, drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" > dimnames(asub(x, 1:2, 1)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1:2, 1, drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1:2, 1, drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1:2, 2)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1:2, 2, drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1:2, 2, drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, 1:2, 3)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" > dimnames(asub(x, 1:2, 3, drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" > dimnames(asub(x, 1:2, 3, drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(1,2))) [[1]] [1] "a" "b" [[2]] [1] "w" "x" "y" "z" > dimnames(asub(x, list(1:2,2), c(1,2), drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "w" "x" "y" "z" > dimnames(asub(x, list(1:2,2), c(1,2), drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "B" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, list(1:2,2), c(2,1))) [[1]] [1] "A" "B" [[2]] [1] "w" "x" "y" "z" > dimnames(asub(x, list(1:2,2), c(2,1), drop=TRUE)) [[1]] [1] "A" "B" [[2]] [1] "w" "x" "y" "z" > dimnames(asub(x, list(1:2,2), c(2,1), drop=FALSE)) [[1]] [1] "b" [[2]] [1] "A" "B" [[3]] [1] "w" "x" "y" "z" > dimnames(asub(x, list(1:2,2), c(1,3))) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" > dimnames(asub(x, list(1:2,2), c(1,3), drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" > dimnames(asub(x, list(1:2,2), c(1,3), drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" "C" [[3]] [1] "x" > dimnames(asub(x, list(1:2,2), c(3,1))) [[1]] [1] "A" "B" "C" [[2]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(3,1), drop=TRUE)) [[1]] [1] "A" "B" "C" [[2]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(3,1), drop=FALSE)) [[1]] [1] "b" [[2]] [1] "A" "B" "C" [[3]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(3,2))) [[1]] [1] "a" "b" [[2]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(3,2), drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(3,2), drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "B" [[3]] [1] "w" "x" > dimnames(asub(x, list(1:2,2), c(2,3))) [[1]] [1] "a" "b" [[2]] [1] "A" "B" > dimnames(asub(x, list(1:2,2), c(2,3), drop=TRUE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" > dimnames(asub(x, list(1:2,2), c(2,3), drop=FALSE)) [[1]] [1] "a" "b" [[2]] [1] "A" "B" [[3]] [1] "x" > dimnames(asub(x, list(1:2,2:3,1:2), c(1,2,3))) [[1]] [1] "a" "b" [[2]] [1] "B" "C" [[3]] [1] "w" "x" > dimnames(asub(x, list(1:2,2:3,1:2), c(1,3,2))) [[1]] [1] "a" "b" [[2]] [1] "A" "B" [[3]] [1] "x" "y" > dimnames(asub(x, list(1:2,2:3,1:2))) [[1]] [1] "a" "b" [[2]] [1] "B" "C" [[3]] [1] "w" "x" > dimnames(asub(x, list(1:2,2,1:2))) [[1]] [1] "a" "b" [[2]] [1] "w" "x" > x <- 5:1 > asub(x, 2:3) [1] 4 3 > asub(x, list(2:3)) [1] 4 3 > x <- matrix(1:6, ncol=2) > asub(x, list(2:3,NULL)) [,1] [,2] [1,] 2 5 [2,] 3 6 > asub(x, list(2:3,NULL), drop=FALSE) [,1] [,2] [1,] 2 5 [2,] 3 6 > asub(x, list(NULL,1), drop=FALSE) [,1] [1,] 1 [2,] 2 [3,] 3 > asub(x, list(1), 1, drop=FALSE) [,1] [,2] [1,] 1 4 > asub(x, list(1), 2, drop=FALSE) [,1] [1,] 1 [2,] 2 [3,] 3 > i <- 1 > asub(x, i, 1) [1] 1 4 > (function() {i <- 2; asub(x, i, 1)})() [1] 2 5 > j <- 3 > (function() {i <- 2; asub(x, j, 1)})() [1] 3 6 > j <- 1 > (function() {i <- 2; asub(x, j, i)})() [1] 1 2 3 > (function() {i <- 2; (function() asub(x, j, i))()})() [1] 1 2 3 > > # 10-d example > x <- array(seq(len=prod(1:10)), dim=1:10) > dim(x) [1] 1 2 3 4 5 6 7 8 9 10 > dim(asub(x, 1, 1)) [1] 2 3 4 5 6 7 8 9 10 > dim(asub(x, 1, 2)) [1] 3 4 5 6 7 8 9 10 > dim(asub(x, 1, 3)) [1] 2 4 5 6 7 8 9 10 > dim(asub(x, 1, 3, drop=F)) [1] 1 2 1 4 5 6 7 8 9 10 > dim(asub(x, list(1,1), c(3,5), drop=F)) [1] 1 2 1 4 1 6 7 8 9 10 > dim(asub(x, list(1,1), c(3,5))) [1] 2 4 6 7 8 9 10 > > proc.time() user system elapsed 0.37 0.12 0.48 Running the tests in 'tests/dnns.R' failed. Complete output: > library(abind) > x <- array(1:4, dim=c(2, 2), dimnames=list(X=c('a','b'), Y=c('d','e'))) > y <- array(5:8, dim=c(2, 2), dimnames=list(W=c('A','B'), Z=c('D','E'))) > # dimname names not used unless use.dnns=T > abind(x, y) d e D E A 1 3 5 7 B 2 4 6 8 > abind(x, y, along=1) D E a 1 3 b 2 4 A 5 7 B 6 8 > abind(x, y, use.dnns=T) Z W d e D E A 1 3 5 7 B 2 4 6 8 > abind(y, x, use.dnns=T) Y X D E d e a 5 7 1 3 b 6 8 2 4 > abind(y, x, use.dnns=T, use.first.dimnames=T) Z W D E d e A 5 7 1 3 B 6 8 2 4 > abind(x, y, use.dnns=T, use.first.dimnames=T) Y X d e D E a 1 3 5 7 b 2 4 6 8 > abind(x, y, along=1, use.dnns=T) Z W D E a 1 3 b 2 4 A 5 7 B 6 8 > abind(y, x, along=1, use.dnns=T) Y X d e A 5 7 B 6 8 a 1 3 b 2 4 > abind(y, x, along=1, use.dnns=T, use.first.dimnames=T) Z W D E A 5 7 B 6 8 a 1 3 b 2 4 > abind(x, y, along=1, use.dnns=T, use.first.dimnames=T) Y X d e a 1 3 b 2 4 A 5 7 B 6 8 > > proc.time() user system elapsed 0.21 0.04 0.25 Flavor: r-devel-windows-x86_64