### Name: pi0.est
### Title: Estimation of the prior probability
### Aliases: pi0.est
### Keywords: htest smooth

### ** Examples
## Not run: 
##D   # Load the package multtest and the data of Golub et al. (1999)
##D   # contained in multtest.
##D   library(multtest)
##D   data(golub)
##D 
##D   # Perform a SAM analysis.
##D   sam.out<-sam(golub,golub.cl,B=100,rand=123)
##D 
##D   # Estimate the prior probability that a gene is not significant
##D   pi0.est(sam.out@p.value)
## End(Not run)