### Name: maxA
### Title: A filter function to filter according to the maximum.
### Aliases: maxA
### Keywords: manip

### ** Examples

   ff <- maxA(30)
   ff(1:10)
   ff(28:31)