casing function

Finds values in a vector directly above and below a number