### Name: pOverA
### Title: A filter function to filter according to the proportion of
###   elements larger than A.
### Aliases: pOverA
### Keywords: manip

### ** Examples

  ff<- pOverA(p=.1, 10)
  ff(1:20)
  ff(1:5)