>> 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-boun...@r-project.org [mailto:r-devel-boun...@r-project.org] On
> Behalf
> Of Paul Gilbert
> Sent: Wednesday, May 29, 2013 9:26 PM
> To: Adler, Avraham
> Cc: r-devel@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@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
