I've fixed this by adding 0.5/mn to q.  The problem (at least in principle) 
with multiplying them all up is integer overflow.

By the time 0.5/mn underflows to zero, missing one value in the distribution 
won't matter.

     -thomas


On Fri, 18 Dec 2009, David John Allwright wrote:

Dear Thomas, Right, thank you. Yes, I haven't looked at the source code (because I don't know C) but something like what you mention could well cause the kind of problems I am seeing: a loop being exectued one too few or one too many times. And yes, I think those quantities should be multiplied up by m*n to all become integers so we escape rounding error problems. David.
------------------------------------------------------------------------------
On Wed, 16 Dec 2009, tlum...@u.washington.edu wrote:

On Tue, 15 Dec 2009, allwr...@maths.ox.ac.uk wrote; (in part)


x<-1:5
y<-c(2.5,4.5)
ks.test(x,y)

The value of the D_2,5 statistic is calculated as 0.4 correctly, but the
p-value is stated by R as 1, though in fact it should be 20/21=0.9524


What we seem to have here is a rounding error problem.

In ks.c:psmirnov2x,  there is a double loop including
            if(fabs(i / md - j / nd) > q)
                u[j] = 0;

where md=2, nd=5, and q=3/10.

Now, to full precision abs(1/2 - 4/5) > 3/10 is false, but at least on my MacBook it is true in C double precision.

I'm not sure why the loop is working with doubles, since multiplying by m*n should make everything an integer.

    -thomas

Thomas Lumley                   Assoc. Professor, Biostatistics
tlum...@u.washington.edu        University of Washington, Seattle





Thomas Lumley                   Assoc. Professor, Biostatistics
tlum...@u.washington.edu        University of Washington, Seattle

______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to