Message-ID: <20080627144518.BD20B2834337@mail.pubhealth.ku.dk>
Date: 2008-06-27T14:45:18Z
From: Martin Maechler
Subject: phyper hang (PR#11813)
>>>>> "MW" == Morten Welinder <terra at gnome.org>
>>>>> on Thu, 26 Jun 2008 03:55:07 +0200 (CEST) writes:
MW> Full_Name: Morten Welinder
MW> Version:
MW> OS: Linux
MW> Submission from: (NULL) (69.113.253.99)
MW> It appears that phyper hangs for insanely large x, such as the call
MW> phyper(1e67,0,0,0)
Yes. I think it only happens for (x, 0,0,0) though.
MW> Adding something like this after the tail swap seems to cure that.
MW> if (x >= NR)
MW> return R_DT_1;
yes, and that also cures phyper(1,0,0,0) which gave NaN
instead of 1.
Is going to be fixed for R-devel and R-patched.
Thank you, Matt!
Martin Maechler, ETH Zurich