Re: [S] strange p-value for Fisher exact's test

Yen-Hong Kuo (yhkuo@monmouth.com)
Mon, 23 Mar 1998 15:57:06 -0500


Not only the previous strange p-value, but also
the other one by using S-PLUS 4.0

==> bugs in S-PLUS 4.0

> fisher.test(rbind(c(1, 1), c(91, 98)))

Fisher's exact test

data: rbind(c(1, 1), c(91, 98))
p-value = 1.0001
alternative hypothesis: two.sided

Cande V Ananth wrote:

> > From marcia@biostat.washington.edu Mon Mar 23 15:15:51 1998
> > Date: Mon, 23 Mar 1998 11:53:08 -0800
> > To: SNEWS <S-NEWS@wubios.wustl.edu>
> > Subject: [S] strange p-value for Fisher exact's test
> >
> > I came across a p-value greater than one in a Fisher exact's test. The
> > output was the following
> >
> > > fisher.test(rbind(c(1, 1), c(71, 77)))
> >
> > Fisher's exact test
> >
> > data: rbind(c(1, 1), c(71, 77))
> > p-value = 1.0001
> > alternative hypothesis: two.sided
>
> Strangely enough, this is what I got:
>
> > fisher.test(rbind(c(1, 1), c(71, 77)))
>
> Fisher's exact test
> data: rbind(c(1, 1), c(71, 77))
> p-value = 1
> alternative hypothesis: two.sided
>
> ---
>
> Cande V. Ananth, PhD, MPH
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> Division of Epidemiology and Biostatistics Tel: (732) 235-7940
> Dept of OB/GYN and Reproductive Sciences Fax: (732) 235-6627
> UMDNJ - Robert Wood Johnson Medical School ananthcv@EPI.UMDNJ.EDU
> 125 Paterson St, New Brunswick NJ 08901 http://epi.umdnj.edu/ananth
>
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Yen-Hong Kuo
Biostatistician ..............................................
Jersey Shore Medical Center TEL : (732)-776-2906
1945 State Route 33 FAX : (732)-776-2432
Neptune, NJ 07754 E-mail: yhkuo@monmouth.com

-----------------------------------------------------------------------
This message was distributed by s-news@wubios.wustl.edu. To unsubscribe
send e-mail to s-news-request@wubios.wustl.edu with the BODY of the
message: unsubscribe s-news