Dear All:

        I create a file named :"P_Value" with only one simple function:

        P_Value <- function( Table ) {
            S = fisher.test(Table, alternative = "two.sided");
            return(S$p.value);
        }

        However, it seems that it's impossible to use this function
directly, because no matter
        where I save this file, R always reports a missing function. For
example,

       > M = matrix(c(25194,2783,307,20),2)
       > P_Value(M)
       Error: could not find function "P_Value"

       Sincerely thanks a lot for any suggestions.

Lowie

-- 
Without dream, life is incomplete!

	[[alternative HTML version deleted]]

