--- tests/d-p-q-r-tests.R 2005-06-12 10:47:42.000000000 +0200 +++ tests/d-p-q-r-tests.R 2005-06-22 17:45:06.000000000 +0200 @@ -503,7 +503,7 @@ pf(x, 5, Inf, ncp=0) pf(x, 5, 1e6, ncp=1) pf(x, 5, 1e7, ncp=1) -all.equal(pf(x, 5, 1e8, ncp=1), tol = 5e-9, +all.equal(pf(x, 5, 1e8, ncp=1), tol = 1e-6, c(0.0659330751, 0.4708802996, 0.9788764591)) pf(x, 5, Inf, ncp=1) --- tests/d-p-q-r-tests.Rout.save 2005-06-12 10:47:41.000000000 +0200 +++ tests/d-p-q-r-tests.Rout.save 2005-06-22 17:45:06.000000000 +0200 @@ -1013,7 +1013,7 @@ [1] 0.065933194 0.470879987 0.978875867 > pf(x, 5, 1e7, ncp=1) [1] 0.06593309 0.47088028 0.97887641 -> all.equal(pf(x, 5, 1e8, ncp=1), tol = 5e-9, +> all.equal(pf(x, 5, 1e8, ncp=1), tol = 1e-6, + c(0.0659330751, 0.4708802996, 0.9788764591)) [1] TRUE > pf(x, 5, Inf, ncp=1)