\HeaderA{pOverA}{A filter function to filter according to the proportion of
elements larger than A.}{pOverA}
\keyword{manip}{pOverA}
\begin{Description}\relax
A function that returns a function with values for \code{A}, \code{p}
and \code{na.rm} bound to the specified values. The function takes a
single vector, \code{x}, as an argument.
When the returned function is evaluated it returns \code{TRUE} if the
proportion of values in \code{x} that are larger than \code{A} is at
least \code{p}.
\end{Description}
\begin{Usage}
\begin{verbatim}
pOverA(p=0.05, A=100, na.rm=TRUE)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{A}] The value to be exceeded. 
\item[\code{p}] The proportion that need to exceed \code{A} for \code{TRUE}
to be returned. 
\item[\code{na.rm}] If \code{TRUE} then \code{NA}'s are removed. 
\end{ldescription}
\end{Arguments}
\begin{Value}
\code{pOverA} returns a function with bindings for \code{A}, \code{p}
and \code{na.rm}. This function evaluates to \code{TRUE} if the
proportion of values in \code{x} that are larger than \code{A} exceeds
\code{p}.
\end{Value}
\begin{Author}\relax
R. Gentleman
\end{Author}
\begin{SeeAlso}\relax
\code{\LinkA{cv}{cv}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
  ff<- pOverA(p=.1, 10)
  ff(1:20)
  ff(1:5)
\end{ExampleCode}
\end{Examples}