thr3ads.net - R devel - [Rd] R 3.5.0 fails its regression test suite on Linux/x86

If this information is useful, please help other people find it:
Share via:

Peter Simons

2018-Apr-23 10:33 UTC

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

Hi,

I just tried to upgrade Nixpkgs to R 3.5.0, but unfortunately the new
version fails its regression test suite. We configure the build using
the flags "--without-recommended-packages", in case that's
relevant. You
can see a complete build log with all relevant information at [1].
Anyway, the test failures look like this:

 | make[3]: Entering directory '/build/R-3.5.0/tests/Examples'
 | Testing examples for package 'base'
 | Testing examples for package 'tools'
 |   comparing 'tools-Ex.Rout' to 'tools-Ex.Rout.save' ... OK
 | Testing examples for package 'utils'
 | Testing examples for package 'grDevices'
 |   comparing 'grDevices-Ex.Rout' to 'grDevices-Ex.Rout.save'
... OK
 | Testing examples for package 'graphics'
 |   comparing 'graphics-Ex.Rout' to 'graphics-Ex.Rout.save' ...
OK
 | Testing examples for package 'stats'
 |   comparing 'stats-Ex.Rout' to 'stats-Ex.Rout.save' ... NOTE
 |   6599c6599
 |   < Grand Mean: 291.5937
 |   ---
 |   > Grand Mean: 291.5938
 |   15124c15124
 |   < Grand Mean: 291.5937
 |   ---
 |   > Grand Mean: 291.5938
 |   17444c17444
 |   < assertCondition: caught "error"
 |   ---
 |   > assertCondition: caught 'error'
 | Testing examples for package 'datasets'
 |   comparing 'datasets-Ex.Rout' to 'datasets-Ex.Rout.save' ...
OK
 | Testing examples for package 'methods'
 | Testing examples for package 'grid'
 |   comparing 'grid-Ex.Rout' to 'grid-Ex.Rout.save' ... OK
 | Testing examples for package 'splines'
 |   comparing 'splines-Ex.Rout' to 'splines-Ex.Rout.save' ...
OK
 | Testing examples for package 'stats4'
 |   comparing 'stats4-Ex.Rout' to 'stats4-Ex.Rout.save' ... OK
 | Testing examples for package 'tcltk'
 | Testing examples for package 'compiler'
 | Testing examples for package 'parallel'
 | make[3]: Leaving directory '/build/R-3.5.0/tests/Examples'
 | make[2]: Leaving directory '/build/R-3.5.0/tests'
 | make[2]: Entering directory '/build/R-3.5.0/tests'
 | make[2]: warning: jobserver unavailable: using -j1.  Add '+' to
parent make rule.
 | running strict specific tests
 | make[3]: Entering directory '/build/R-3.5.0/tests'
 | running code in 'eval-etc.R' ... OK
 |   comparing 'eval-etc.Rout' to './eval-etc.Rout.save'
...414,416c414,548
 | < Warning message:
 | < In library(package, lib.loc = lib.loc, character.only = TRUE,
logical.return = TRUE,  :
 | <   there is no package called 'Matrix'
 | ---
 | > Trying some Matrix objects, too
 | >
 | > Matrix> Matrix(0, 3, 2)             # 3 by 2 matrix of zeros ->
sparse
 | > 3 x 2 sparse Matrix of class "dgCMatrix"
 | >
 | > [1,] . .
 | > [2,] . .
 | > [3,] . .
 | >
 | > Matrix> Matrix(0, 3, 2, sparse=FALSE)# -> 'dense'
 | > 3 x 2 Matrix of class "dgeMatrix"
 | >      [,1] [,2]
 | > [1,]    0    0
 | > [2,]    0    0
 | > [3,]    0    0
 | >
 | > Matrix> Matrix(0, 2, 2, sparse=FALSE)# diagonal !
 | > 2 x 2 diagonal matrix of class "ddiMatrix"
 | >      [,1] [,2]
 | > [1,]    0    .
 | > [2,]    .    0
 | >
 | > Matrix> Matrix(0, 2, 2, sparse=FALSE, doDiag=FALSE)# -> dense
 | > 2 x 2 Matrix of class "dsyMatrix"
 | >      [,1] [,2]
 | > [1,]    0    0
 | > [2,]    0    0
 | >
 | > Matrix> Matrix(1:6, 3, 2)           # a 3 by 2 matrix (+ integer
warning)
 | > 3 x 2 Matrix of class "dgeMatrix"
 | >      [,1] [,2]
 | > [1,]    1    4
 | > [2,]    2    5
 | > [3,]    3    6
 | >
 | > Matrix> Matrix(1:6 + 1, nrow=3)
 | > 3 x 2 Matrix of class "dgeMatrix"
 | >      [,1] [,2]
 | > [1,]    2    5
 | > [2,]    3    6
 | > [3,]    4    7
 | >
 | > Matrix> ## logical ones:
 | > Matrix> Matrix(diag(4) >  0)# -> "ldiMatrix" with
diag = "U"
 | > 4 x 4 diagonal matrix of class "ldiMatrix"
 | >      [,1] [,2] [,3] [,4]
 | > [1,] TRUE    .    .    .
 | > [2,]    . TRUE    .    .
 | > [3,]    .    . TRUE    .
 | > [4,]    .    .    . TRUE
 | >
 | > Matrix> Matrix(diag(4) >  0, sparse=TRUE)# -> sparse...
 | > 4 x 4 sparse Matrix of class "lsCMatrix"
 | >
 | > [1,] | . . .
 | > [2,] . | . .
 | > [3,] . . | .
 | > [4,] . . . |
 | >
 | > Matrix> Matrix(diag(4) >= 0)# -> "lsyMatrix" (of all
'TRUE')
 | > 4 x 4 Matrix of class "lsyMatrix"
 | >      [,1] [,2] [,3] [,4]
 | > [1,] TRUE TRUE TRUE TRUE
 | > [2,] TRUE TRUE TRUE TRUE
 | > [3,] TRUE TRUE TRUE TRUE
 | > [4,] TRUE TRUE TRUE TRUE
 | >
 | > Matrix> ## triangular
 | > Matrix> l3 <- upper.tri(matrix(,3,3))
 | >
 | > Matrix> (M <- Matrix(l3))  # -> "ltCMatrix"
 | > 3 x 3 sparse Matrix of class "ltCMatrix"
 | >
 | > [1,] . | |
 | > [2,] . . |
 | > [3,] . . .
 | >
 | > Matrix> Matrix(! l3)# -> "ltrMatrix"
 | > 3 x 3 Matrix of class "ltrMatrix"
 | >      [,1]  [,2]  [,3]
 | > [1,]  TRUE     .     .
 | > [2,]  TRUE  TRUE     .
 | > [3,]  TRUE  TRUE  TRUE
 | >
 | > Matrix> as(l3, "CsparseMatrix")
 | > 3 x 3 sparse Matrix of class "lgCMatrix"
 | >
 | > [1,] . | |
 | > [2,] . . |
 | > [3,] . . .
 | >
 | > Matrix> Matrix(1:9, nrow=3,
 | > Matrix+        dimnames = list(c("a", "b",
"c"), c("A", "B", "C")))
 | > 3 x 3 Matrix of class "dgeMatrix"
 | >   A B C
 | > a 1 4 7
 | > b 2 5 8
 | > c 3 6 9
 | >
 | > Matrix> (I3 <- Matrix(diag(3)))# identity, i.e., unit
"diagonalMatrix"
 | > 3 x 3 diagonal matrix of class "ddiMatrix"
 | >      [,1] [,2] [,3]
 | > [1,]    1    .    .
 | > [2,]    .    1    .
 | > [3,]    .    .    1
 | >
 | > Matrix> str(I3) # note the empty 'x' slot
 | > Formal class 'ddiMatrix' [package "Matrix"] with 4
slots
 | >   ..@ diag    : chr "U"
 | >   ..@ Dim     : int [1:2] 3 3
 | >   ..@ Dimnames:List of 2
 | >   .. ..$ : NULL
 | >   .. ..$ : NULL
 | >   ..@ x       : num(0)
 | >
 | > Matrix> (A <- cbind(a=c(2,1), b=1:2))# symmetric *apart* from
dimnames
 | >      a b
 | > [1,] 2 1
 | > [2,] 1 2
 | >
 | > Matrix> Matrix(A)                    # hence 'dgeMatrix'
 | > 2 x 2 Matrix of class "dgeMatrix"
 | >      a b
 | > [1,] 2 1
 | > [2,] 1 2
 | >
 | > Matrix> (As <- Matrix(A, dimnames = list(NULL,NULL)))# ->
symmetric
 | > 2 x 2 Matrix of class "dsyMatrix"
 | >      [,1] [,2]
 | > [1,]    2    1
 | > [2,]    1    2
 | >
 | > Matrix> stopifnot(is(As, "symmetricMatrix"),
 | > Matrix+           is(Matrix(0, 3,3), "sparseMatrix"),
 | > Matrix+           is(Matrix(FALSE, 1,1), "sparseMatrix"))
 | 430,436c562,564
 | < A: function (x, y, ...)
 | < {
 | <     B <- function(a, b, ...) {
 | <         match.call()
 | <     }
 | <     B(x + y, ...)
 | < }
 | ---
 | > A: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L), Dimnames =
list(
 | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), factors = list())
 | 438,444c566,589
 | < checking body(.):
 | < quote({
 | <     B <- function(a, b, ...) {
 | <         match.call()
 | <     }
 | <     B(x + y, ...)
 | < })
 | ---
 | > --=--=--=--=--
 | > A.: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L), Dimnames =
list(
 | >     NULL, NULL), x = c(2, 21, 28, 35, 14, 42, 49), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > A1: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L), Dimnames =
list(
 | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > AA: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L, 7L, 7L, 7L, 7L, 7L, 7L,
 | > 7L, 7L, 7L, 7L), Dim = c(10L, 20L), Dimnames = list(NULL, NULL),
 | >     x = c(7, 21, 28, 35, 14, 42, 49), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > Aa: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L), Dimnames =
list(
 | >     NULL, NULL), x = c(9, 21, 28, 35, 14, 42, 49), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > As: new("dsyMatrix", x = c(2, 1, 1, 2), Dim = c(2L, 2L),
Dimnames = list(
 | >     NULL, NULL), uplo = "U", factors = list())
 | 446,448d590
 | < checking formals(.):
 | < as.pairlist(alist(x = , y = , ... = ))
 | < __ not parse()able __: hasMissObj(.) is true
 | 551a694,701
 | > D5.: new("ddiMatrix", diag = "N", Dim = c(5L, 5L),
Dimnames = list(
 | >     NULL, NULL), x = c(5, 4, 3, 2, 1))
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > D5N: new("ddiMatrix", diag = "N", Dim = c(5L, 5L),
Dimnames = list(
 | >     NULL, NULL), x = c(5, 4, 3, 2, NA))
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 564a715,718
 | > I3: new("ddiMatrix", diag = "U", Dim = c(3L, 3L),
Dimnames = list(
 | >     NULL, NULL), x = numeric(0))
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 588a743,747
 | > M: new("ltCMatrix", i = c(0L, 0L, 1L), p = c(0L, 0L, 1L, 3L),
Dim = c(3L,
 | > 3L), Dimnames = list(NULL, NULL), x = c(TRUE, TRUE, TRUE), uplo =
"U",
 | >     diag = "N")
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 612a772,776
 | > args: structure(list(i = c(1, 3, 4, 5, 6, 7, 8, 1), j = c(2, 9, 6,
 | > 7, 8, 9, 10, 2), x = c(7, 14, 21, 28, 35, 42, 49, 2)), class =
"data.frame", row.names = c(NA,
 | > -8L))
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 732,733c896,901
 | < e: <environment>
 | < __ not parse()able __: environment
 | ---
 | > dn: list(c("A", "B", "C"),
c("a", "b", "c", "d", "e"))
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > e: new("ngCMatrix", i = integer(0), p = c(0L, 0L, 0L, 0L, 0L,
0L,
 | > 0L), Dim = c(4L, 6L), Dimnames = list(NULL, NULL), factors = list())
 | >  --> checking list(*): Ok
 | 844a1013,1015
 | > i: c(1, 3, 4, 5, 6, 7, 8)
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 876a1048,1050
 | > j: c(2, 9, 6, 7, 8, 9, 10)
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 886a1061,1064
 | > l3: structure(c(FALSE, FALSE, FALSE, TRUE, FALSE, FALSE, TRUE, TRUE,
 | > FALSE), .Dim = c(3L, 3L))
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 891a1070,1074
 | > m: new("dgCMatrix", i = c(2L, 0L, 1L, 2L, 0L, 1L), p = c(0L,
1L,
 | > 2L, 4L, 4L, 6L), Dim = c(3L, 5L), Dimnames = list(c("A",
"B",
 | > "C"), c("a", "b", "c",
"d", "e")), x = c(1, 2, 4, 3, 6, 5), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 944a1128,1136
 | > n: new("ngCMatrix", i = 5:0, p = c(0L, 0L, 1L, 2L, 3L, 4L, 5L,
6L
 | > ), Dim = 6:7, Dimnames = list(NULL, NULL), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | > nA: new("ngCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L), Dimnames =
list(
 | >     NULL, NULL), factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 961a1154,1156
 | > perm: c(2L, 3L, 6L, 4L, 1L, 7L, 5L)
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 1010a1206,1211
 | > sA: new("dsCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(10L, 10L), Dimnames =
list(
 | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), uplo = "U",
 | >     factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 1014a1216,1220
 | > sy: new("dsCMatrix", i = c(1L, 3L, 4L, 2L, 3L), p = c(0L, 0L,
0L,
 | > 0L, 1L, 3L, 4L, 5L), Dim = c(7L, 7L), Dimnames = list(NULL, NULL),
 | >     x = c(1, 4, 5, 3, 2), uplo = "U", factors = list())
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 1018a1225,1230
 | > tA: new("dtCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p =
c(0L,
 | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(10L, 10L), Dimnames =
list(
 | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), uplo = "U",
 | >     diag = "N")
 | >  --> checking list(*): Ok
 | > --=--=--=--=--
 | 1048c1260,1261
 | < 2: In dput(x, control = control) : deparse may be incomplete
 | ---
 | > 2: In deparse(expr, backtick = backtick, control = control, ...) :
 | >   deparse may be incomplete
 | 1051c1264,1265
 | < 4: In deparse(expr, backtick = backtick, control = control, ...) :
 | ---
 | > 4: In dput(x, control = control) : deparse may be incomplete
 | > 5: In deparse(expr, backtick = backtick, control = control, ...) :
 | 1053d1266
 | < 5: In dput(x, control = control) : deparse may be incomplete
 | 1056c1269,1270
 | < 7: In deparse(expr, backtick = backtick, control = control, ...) :
 | ---
 | > 7: In dput(x, control = control) : deparse may be incomplete
 | > 8: In deparse(expr, backtick = backtick, control = control, ...) :
 | 1058d1271
 | < 8: In dput(x, control = control) : deparse may be incomplete
 | 1061,1062d1273
 | < 10: In deparse(expr, backtick = backtick, control = control, ...) :
 | <   deparse may be incomplete
 | 1064c1275
 | < Summary of (a total of 10) warning messages:
 | ---
 | > Summary of (a total of 9) warning messages:
 | 1066c1277
 | < 4x : In deparse(expr, backtick = backtick, control = control,  ... :
 | ---
 | > 3x : In deparse(expr, backtick = backtick, control = control,  ... :
 | make[3]: *** [Makefile.common:106: eval-etc.Rout] Error 1

Now, I'm not quite sure how to interpret that output. Some of these
issues seem harmless, really, and not indicative of a serious problem in
R. Still, I reckon that it would be nice if the test suite would pass
and for all I know other people might run into the same issue as we did,
so I felt I should report it to the devs.

If there is any advice how to remedy this issues, then I'd very much
appreciate it.

Best regards,
Peter

[1] https://hydra.nixos.org/build/73154582/nixlog/3

Dirk Eddelbuettel

2018-Apr-23 11:33 UTC

head link

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

On 23 April 2018 at 12:33, Peter Simons wrote:
| Hi,
| 
| I just tried to upgrade Nixpkgs to R 3.5.0, but unfortunately the new
| version fails its regression test suite. We configure the build using
| the flags "--without-recommended-packages", in case that's
relevant. You
| can see a complete build log with all relevant information at [1].
| Anyway, the test failures look like this:

The flag instructs R not to build new 'recommended packages'; however
the
tests you run later need them.  This release has a binary change so you
actually need to rebuild dependent packages -- in other words I think you can
expect (some of) these tests to fail until these recommended packages are
rebuilt.
>From the doc/NEWS file, lines 395 and on:
    * The object header layout has been changed to support merging the
      ALTREP branch. This requires re-installing packages that use
      compiled code.

Dirk

-- 
http://dirk.eddelbuettel.com | @eddelbuettel | edd at debian.org

Duncan Murdoch

2018-Apr-23 11:35 UTC

head link

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

On 23/04/2018 6:33 AM, Peter Simons wrote:> Hi,
> 
> I just tried to upgrade Nixpkgs to R 3.5.0, but unfortunately the new
> version fails its regression test suite. We configure the build using
> the flags "--without-recommended-packages", in case that's
relevant. You
> can see a complete build log with all relevant information at [1].
> Anyway, the test failures look like this:
I haven't read the full script below, but a lot of it has to do with 
tests of Matrix, which is a recommended package.  Since you built 
without it, they should be expected to fail.

You can likely get rid of most of them by building with the recommended 
packages.

Duncan Murdoch
> 
>   | make[3]: Entering directory '/build/R-3.5.0/tests/Examples'
>   | Testing examples for package 'base'
>   | Testing examples for package 'tools'
>   |   comparing 'tools-Ex.Rout' to 'tools-Ex.Rout.save' ...
OK
>   | Testing examples for package 'utils'
>   | Testing examples for package 'grDevices'
>   |   comparing 'grDevices-Ex.Rout' to
'grDevices-Ex.Rout.save' ... OK
>   | Testing examples for package 'graphics'
>   |   comparing 'graphics-Ex.Rout' to
'graphics-Ex.Rout.save' ... OK
>   | Testing examples for package 'stats'
>   |   comparing 'stats-Ex.Rout' to 'stats-Ex.Rout.save' ...
NOTE
>   |   6599c6599
>   |   < Grand Mean: 291.5937
>   |   ---
>   |   > Grand Mean: 291.5938
>   |   15124c15124
>   |   < Grand Mean: 291.5937
>   |   ---
>   |   > Grand Mean: 291.5938
>   |   17444c17444
>   |   < assertCondition: caught "error"
>   |   ---
>   |   > assertCondition: caught 'error'
>   | Testing examples for package 'datasets'
>   |   comparing 'datasets-Ex.Rout' to
'datasets-Ex.Rout.save' ... OK
>   | Testing examples for package 'methods'
>   | Testing examples for package 'grid'
>   |   comparing 'grid-Ex.Rout' to 'grid-Ex.Rout.save' ...
OK
>   | Testing examples for package 'splines'
>   |   comparing 'splines-Ex.Rout' to 'splines-Ex.Rout.save'
... OK
>   | Testing examples for package 'stats4'
>   |   comparing 'stats4-Ex.Rout' to 'stats4-Ex.Rout.save'
... OK
>   | Testing examples for package 'tcltk'
>   | Testing examples for package 'compiler'
>   | Testing examples for package 'parallel'
>   | make[3]: Leaving directory '/build/R-3.5.0/tests/Examples'
>   | make[2]: Leaving directory '/build/R-3.5.0/tests'
>   | make[2]: Entering directory '/build/R-3.5.0/tests'
>   | make[2]: warning: jobserver unavailable: using -j1.  Add '+' to
parent make rule.
>   | running strict specific tests
>   | make[3]: Entering directory '/build/R-3.5.0/tests'
>   | running code in 'eval-etc.R' ... OK
>   |   comparing 'eval-etc.Rout' to './eval-etc.Rout.save'
...414,416c414,548
>   | < Warning message:
>   | < In library(package, lib.loc = lib.loc, character.only = TRUE,
logical.return = TRUE,  :
>   | <   there is no package called 'Matrix'
>   | ---
>   | > Trying some Matrix objects, too
>   | >
>   | > Matrix> Matrix(0, 3, 2)             # 3 by 2 matrix of zeros
-> sparse
>   | > 3 x 2 sparse Matrix of class "dgCMatrix"
>   | >
>   | > [1,] . .
>   | > [2,] . .
>   | > [3,] . .
>   | >
>   | > Matrix> Matrix(0, 3, 2, sparse=FALSE)# -> 'dense'
>   | > 3 x 2 Matrix of class "dgeMatrix"
>   | >      [,1] [,2]
>   | > [1,]    0    0
>   | > [2,]    0    0
>   | > [3,]    0    0
>   | >
>   | > Matrix> Matrix(0, 2, 2, sparse=FALSE)# diagonal !
>   | > 2 x 2 diagonal matrix of class "ddiMatrix"
>   | >      [,1] [,2]
>   | > [1,]    0    .
>   | > [2,]    .    0
>   | >
>   | > Matrix> Matrix(0, 2, 2, sparse=FALSE, doDiag=FALSE)# ->
dense
>   | > 2 x 2 Matrix of class "dsyMatrix"
>   | >      [,1] [,2]
>   | > [1,]    0    0
>   | > [2,]    0    0
>   | >
>   | > Matrix> Matrix(1:6, 3, 2)           # a 3 by 2 matrix (+
integer warning)
>   | > 3 x 2 Matrix of class "dgeMatrix"
>   | >      [,1] [,2]
>   | > [1,]    1    4
>   | > [2,]    2    5
>   | > [3,]    3    6
>   | >
>   | > Matrix> Matrix(1:6 + 1, nrow=3)
>   | > 3 x 2 Matrix of class "dgeMatrix"
>   | >      [,1] [,2]
>   | > [1,]    2    5
>   | > [2,]    3    6
>   | > [3,]    4    7
>   | >
>   | > Matrix> ## logical ones:
>   | > Matrix> Matrix(diag(4) >  0)# -> "ldiMatrix"
with diag = "U"
>   | > 4 x 4 diagonal matrix of class "ldiMatrix"
>   | >      [,1] [,2] [,3] [,4]
>   | > [1,] TRUE    .    .    .
>   | > [2,]    . TRUE    .    .
>   | > [3,]    .    . TRUE    .
>   | > [4,]    .    .    . TRUE
>   | >
>   | > Matrix> Matrix(diag(4) >  0, sparse=TRUE)# -> sparse...
>   | > 4 x 4 sparse Matrix of class "lsCMatrix"
>   | >
>   | > [1,] | . . .
>   | > [2,] . | . .
>   | > [3,] . . | .
>   | > [4,] . . . |
>   | >
>   | > Matrix> Matrix(diag(4) >= 0)# -> "lsyMatrix"
(of all 'TRUE')
>   | > 4 x 4 Matrix of class "lsyMatrix"
>   | >      [,1] [,2] [,3] [,4]
>   | > [1,] TRUE TRUE TRUE TRUE
>   | > [2,] TRUE TRUE TRUE TRUE
>   | > [3,] TRUE TRUE TRUE TRUE
>   | > [4,] TRUE TRUE TRUE TRUE
>   | >
>   | > Matrix> ## triangular
>   | > Matrix> l3 <- upper.tri(matrix(,3,3))
>   | >
>   | > Matrix> (M <- Matrix(l3))  # -> "ltCMatrix"
>   | > 3 x 3 sparse Matrix of class "ltCMatrix"
>   | >
>   | > [1,] . | |
>   | > [2,] . . |
>   | > [3,] . . .
>   | >
>   | > Matrix> Matrix(! l3)# -> "ltrMatrix"
>   | > 3 x 3 Matrix of class "ltrMatrix"
>   | >      [,1]  [,2]  [,3]
>   | > [1,]  TRUE     .     .
>   | > [2,]  TRUE  TRUE     .
>   | > [3,]  TRUE  TRUE  TRUE
>   | >
>   | > Matrix> as(l3, "CsparseMatrix")
>   | > 3 x 3 sparse Matrix of class "lgCMatrix"
>   | >
>   | > [1,] . | |
>   | > [2,] . . |
>   | > [3,] . . .
>   | >
>   | > Matrix> Matrix(1:9, nrow=3,
>   | > Matrix+        dimnames = list(c("a", "b",
"c"), c("A", "B", "C")))
>   | > 3 x 3 Matrix of class "dgeMatrix"
>   | >   A B C
>   | > a 1 4 7
>   | > b 2 5 8
>   | > c 3 6 9
>   | >
>   | > Matrix> (I3 <- Matrix(diag(3)))# identity, i.e., unit
"diagonalMatrix"
>   | > 3 x 3 diagonal matrix of class "ddiMatrix"
>   | >      [,1] [,2] [,3]
>   | > [1,]    1    .    .
>   | > [2,]    .    1    .
>   | > [3,]    .    .    1
>   | >
>   | > Matrix> str(I3) # note the empty 'x' slot
>   | > Formal class 'ddiMatrix' [package "Matrix"] with
4 slots
>   | >   ..@ diag    : chr "U"
>   | >   ..@ Dim     : int [1:2] 3 3
>   | >   ..@ Dimnames:List of 2
>   | >   .. ..$ : NULL
>   | >   .. ..$ : NULL
>   | >   ..@ x       : num(0)
>   | >
>   | > Matrix> (A <- cbind(a=c(2,1), b=1:2))# symmetric *apart*
from dimnames
>   | >      a b
>   | > [1,] 2 1
>   | > [2,] 1 2
>   | >
>   | > Matrix> Matrix(A)                    # hence
'dgeMatrix'
>   | > 2 x 2 Matrix of class "dgeMatrix"
>   | >      a b
>   | > [1,] 2 1
>   | > [2,] 1 2
>   | >
>   | > Matrix> (As <- Matrix(A, dimnames = list(NULL,NULL)))# ->
symmetric
>   | > 2 x 2 Matrix of class "dsyMatrix"
>   | >      [,1] [,2]
>   | > [1,]    2    1
>   | > [2,]    1    2
>   | >
>   | > Matrix> stopifnot(is(As, "symmetricMatrix"),
>   | > Matrix+           is(Matrix(0, 3,3), "sparseMatrix"),
>   | > Matrix+           is(Matrix(FALSE, 1,1),
"sparseMatrix"))
>   | 430,436c562,564
>   | < A: function (x, y, ...)
>   | < {
>   | <     B <- function(a, b, ...) {
>   | <         match.call()
>   | <     }
>   | <     B(x + y, ...)
>   | < }
>   | ---
>   | > A: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L), p
= c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L),
Dimnames = list(
>   | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), factors =
list())
>   | 438,444c566,589
>   | < checking body(.):
>   | < quote({
>   | <     B <- function(a, b, ...) {
>   | <         match.call()
>   | <     }
>   | <     B(x + y, ...)
>   | < })
>   | ---
>   | > --=--=--=--=--
>   | > A.: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L),
Dimnames = list(
>   | >     NULL, NULL), x = c(2, 21, 28, 35, 14, 42, 49), factors =
list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > A1: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L),
Dimnames = list(
>   | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), factors =
list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > AA: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L, 7L, 7L, 7L, 7L, 7L, 7L,
>   | > 7L, 7L, 7L, 7L), Dim = c(10L, 20L), Dimnames = list(NULL, NULL),
>   | >     x = c(7, 21, 28, 35, 14, 42, 49), factors = list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > Aa: new("dgCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L),
Dimnames = list(
>   | >     NULL, NULL), x = c(9, 21, 28, 35, 14, 42, 49), factors =
list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > As: new("dsyMatrix", x = c(2, 1, 1, 2), Dim = c(2L, 2L),
Dimnames = list(
>   | >     NULL, NULL), uplo = "U", factors = list())
>   | 446,448d590
>   | < checking formals(.):
>   | < as.pairlist(alist(x = , y = , ... = ))
>   | < __ not parse()able __: hasMissObj(.) is true
>   | 551a694,701
>   | > D5.: new("ddiMatrix", diag = "N", Dim = c(5L,
5L), Dimnames = list(
>   | >     NULL, NULL), x = c(5, 4, 3, 2, 1))
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > D5N: new("ddiMatrix", diag = "N", Dim = c(5L,
5L), Dimnames = list(
>   | >     NULL, NULL), x = c(5, 4, 3, 2, NA))
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 564a715,718
>   | > I3: new("ddiMatrix", diag = "U", Dim = c(3L,
3L), Dimnames = list(
>   | >     NULL, NULL), x = numeric(0))
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 588a743,747
>   | > M: new("ltCMatrix", i = c(0L, 0L, 1L), p = c(0L, 0L, 1L,
3L), Dim = c(3L,
>   | > 3L), Dimnames = list(NULL, NULL), x = c(TRUE, TRUE, TRUE), uplo =
"U",
>   | >     diag = "N")
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 612a772,776
>   | > args: structure(list(i = c(1, 3, 4, 5, 6, 7, 8, 1), j = c(2, 9, 6,
>   | > 7, 8, 9, 10, 2), x = c(7, 14, 21, 28, 35, 42, 49, 2)), class =
"data.frame", row.names = c(NA,
>   | > -8L))
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 732,733c896,901
>   | < e: <environment>
>   | < __ not parse()able __: environment
>   | ---
>   | > dn: list(c("A", "B", "C"),
c("a", "b", "c", "d", "e"))
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > e: new("ngCMatrix", i = integer(0), p = c(0L, 0L, 0L,
0L, 0L, 0L,
>   | > 0L), Dim = c(4L, 6L), Dimnames = list(NULL, NULL), factors =
list())
>   | >  --> checking list(*): Ok
>   | 844a1013,1015
>   | > i: c(1, 3, 4, 5, 6, 7, 8)
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 876a1048,1050
>   | > j: c(2, 9, 6, 7, 8, 9, 10)
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 886a1061,1064
>   | > l3: structure(c(FALSE, FALSE, FALSE, TRUE, FALSE, FALSE, TRUE,
TRUE,
>   | > FALSE), .Dim = c(3L, 3L))
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 891a1070,1074
>   | > m: new("dgCMatrix", i = c(2L, 0L, 1L, 2L, 0L, 1L), p =
c(0L, 1L,
>   | > 2L, 4L, 4L, 6L), Dim = c(3L, 5L), Dimnames = list(c("A",
"B",
>   | > "C"), c("a", "b", "c",
"d", "e")), x = c(1, 2, 4, 3, 6, 5), factors = list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 944a1128,1136
>   | > n: new("ngCMatrix", i = 5:0, p = c(0L, 0L, 1L, 2L, 3L,
4L, 5L, 6L
>   | > ), Dim = 6:7, Dimnames = list(NULL, NULL), factors = list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | > nA: new("ngCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(8L, 10L),
Dimnames = list(
>   | >     NULL, NULL), factors = list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 961a1154,1156
>   | > perm: c(2L, 3L, 6L, 4L, 1L, 7L, 5L)
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 1010a1206,1211
>   | > sA: new("dsCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(10L, 10L),
Dimnames = list(
>   | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), uplo =
"U",
>   | >     factors = list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 1014a1216,1220
>   | > sy: new("dsCMatrix", i = c(1L, 3L, 4L, 2L, 3L), p =
c(0L, 0L, 0L,
>   | > 0L, 1L, 3L, 4L, 5L), Dim = c(7L, 7L), Dimnames = list(NULL, NULL),
>   | >     x = c(1, 4, 5, 3, 2), uplo = "U", factors = list())
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 1018a1225,1230
>   | > tA: new("dtCMatrix", i = c(0L, 3L, 4L, 5L, 2L, 6L, 7L),
p = c(0L,
>   | > 0L, 1L, 1L, 1L, 1L, 2L, 3L, 4L, 6L, 7L), Dim = c(10L, 10L),
Dimnames = list(
>   | >     NULL, NULL), x = c(7, 21, 28, 35, 14, 42, 49), uplo =
"U",
>   | >     diag = "N")
>   | >  --> checking list(*): Ok
>   | > --=--=--=--=--
>   | 1048c1260,1261
>   | < 2: In dput(x, control = control) : deparse may be incomplete
>   | ---
>   | > 2: In deparse(expr, backtick = backtick, control = control, ...) :
>   | >   deparse may be incomplete
>   | 1051c1264,1265
>   | < 4: In deparse(expr, backtick = backtick, control = control, ...) :
>   | ---
>   | > 4: In dput(x, control = control) : deparse may be incomplete
>   | > 5: In deparse(expr, backtick = backtick, control = control, ...) :
>   | 1053d1266
>   | < 5: In dput(x, control = control) : deparse may be incomplete
>   | 1056c1269,1270
>   | < 7: In deparse(expr, backtick = backtick, control = control, ...) :
>   | ---
>   | > 7: In dput(x, control = control) : deparse may be incomplete
>   | > 8: In deparse(expr, backtick = backtick, control = control, ...) :
>   | 1058d1271
>   | < 8: In dput(x, control = control) : deparse may be incomplete
>   | 1061,1062d1273
>   | < 10: In deparse(expr, backtick = backtick, control = control, ...)
:
>   | <   deparse may be incomplete
>   | 1064c1275
>   | < Summary of (a total of 10) warning messages:
>   | ---
>   | > Summary of (a total of 9) warning messages:
>   | 1066c1277
>   | < 4x : In deparse(expr, backtick = backtick, control = control,  ...
:
>   | ---
>   | > 3x : In deparse(expr, backtick = backtick, control = control,  ...
:
>   | make[3]: *** [Makefile.common:106: eval-etc.Rout] Error 1
> 
> Now, I'm not quite sure how to interpret that output. Some of these
> issues seem harmless, really, and not indicative of a serious problem in
> R. Still, I reckon that it would be nice if the test suite would pass
> and for all I know other people might run into the same issue as we did,
> so I felt I should report it to the devs.
> 
> If there is any advice how to remedy this issues, then I'd very much
> appreciate it.
> 
> Best regards,
> Peter
> 
> [1] https://hydra.nixos.org/build/73154582/nixlog/3
> 
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>

Ricardo Wurmus

2018-Apr-23 12:11 UTC

head link

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

Hi Dirk,
> On 23 April 2018 at 12:33, Peter Simons wrote:
> | Hi,
> |
> | I just tried to upgrade Nixpkgs to R 3.5.0, but unfortunately the new
> | version fails its regression test suite. We configure the build using
> | the flags "--without-recommended-packages", in case that's
relevant. You
> | can see a complete build log with all relevant information at [1].
> | Anyway, the test failures look like this:
>
> The flag instructs R not to build new 'recommended packages';
however the
> tests you run later need them.
Is there a way to disable only those tests that depend on the
recommended packages?  Would it make sense to disable these tests by
default when ?--without-recommended-packages? is passed?
> This release has a binary change so you
> actually need to rebuild dependent packages -- in other words I think you
can
> expect (some of) these tests to fail until these recommended packages are
> rebuilt.
I?ve hit the same problem as Peter in upgrading R for Guix.  We build
the recommended packages as separate packages later, so that we can
offer a minimal R package.  At the time when R itself is built the
environment does not contain any R packages, so there is nothing to be
rebuilt.

Another problem with building the recommended packages as part of the R
build process is that it?s more difficult to make them build
bit-reproducibly.  Building them as separate packages simplifies that
and enables us to prevent e.g. the embedding of timestamps.

--
Ricardo

Peter Simons

2018-Apr-23 13:14 UTC

head link

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

Duncan Murdoch <murdoch.duncan at gmail.com> writes:

 > You can likely get rid of most of them by building with the recommended
 > packages.

unfortunately, this is not an option for us. For various reasons, our
build process requires that we build those packages separately. Ricardo
appears to be in a similar situation and he has outlined some of those
reasons already in his message.

Anyway, it would be FAR better for us if "make check" would simply
succeed in the configuration we're using. We'd be perfectly happy to
have those tests disabled that cannot be executed without the
recommended packages available.

Is there a way to accomplish that?

Best regards,
Peter

Possibly Parallel Threads

Search for more maybe matching threads

R devel - Apr 2018 - R 3.5.0 fails its regression test suite on Linux/x86_64

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

[Rd] R 3.5.0 fails its regression test suite on Linux/x86_64

Possibly Parallel Threads