nrselect
in nr2.h
extern float nrselect(unsigned long k, unsigned long n, float arr[]);