[Rd] R-3.0.1 - "transient" make check failure in splines-EX.r

[William Dunlap]

>> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> [1] FALSE
>> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> [1] TRUE

If you used a function like
   identicalOrReturnInputs <- function(x, y) {
      if (identical(x, y)) {
          TRUE
     } else {
          list(x=x, y=y)
     }
  }
instead of just identical() you could see what sort of differences you are getting.
(Put it in an lapply call and later collect all the non-TRUE results.)

Bill Dunlap
Spotfire, TIBCO Software
wdunlap tibco.com


> -----Original Message-----
> From: r-devel-bounces at r-project.org [mailto:r-devel-bounces at r-project.org] On Behalf
> Of Paul Gilbert
> Sent: Wednesday, May 29, 2013 9:26 PM
> To: Adler, Avraham
> Cc: r-devel at r-project.org
> Subject: Re: [Rd] R-3.0.1 - "transient" make check failure in splines-EX.r
> 
> Avraham
> 
> I resolved this only by switching to a different BLAS on the 32 bit
> machine.Since no one else seemed to be having problems, I considered it
> possible that there was a hardware issue on my old 32 bit machine. The R
> check test failed somewhat randomly, but often. most disconcertingly, it
> failed because it gives different answers. If you source the code in an
> R session a few times you have no trouble reproducing this. It gives the
> impression of an improperly zeroed matrix.
> 
> (All this from memory, I'm on the road.)
> 
> Paul
> 
> On 13-05-28 06:36 PM, Adler, Avraham wrote:
> >
> > Hello.
> >
> > I seem to be having the same problem that Paul had in the thread titled "[Rd] R 2.15.2
> make check failure on 32-bit --with-blas="-lgoto2"" from October of last year
> <https://stat.ethz.ch/pipermail/r-devel/2012-October/065103.html> Unfortunately, that
> thread ended without an answer to his last question.
> >
> > Briefly, I am trying to compile an Rblas for Windows NT 32bit using OpenBlas
> (successor to GotoBlas) (Nehalem - corei7), and the compiled version passes all tests
> except for the "splines-Ex" test in the exact same place that Paul had issues:
> >
> > ~~~~
> >> stopifnot(identical(ns(x), ns(x, df = 1)),
> > +           identical(ns(x, df = 2), ns(x, df = 2, knots = NULL)), # not true till 2.15.2
> > +           !is.null(kk <- attr(ns(x), "knots")), # not true till 1.5.1
> > +           length(kk) == 0)
> > Error: identical(ns(x, df = 2), ns(x, df = 2, knots = NULL)) is not TRUE
> > ~~~~
> >
> > Yet, opening up R and running the actual code shows that the error is transient:
> >
> > ~~~~
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] FALSE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] TRUE
> >> identical(ns(x, df = 2), ns(x, df = 2, knots = NULL))
> > [1] FALSE
> > ~~~~
> >
> > This is the only error I have on the 32-bit version, I believe (trying to build a blas for 64-
> bit on SandyBridge is a completely different kettle of fish that is causing me to pull out
> what little hair I have left), and if it can be solved that would be great.
> >
> > Thank you,
> >
> > Avraham
> >
> >
> >
> >
> >
> 
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel