Added findInterval method in R

Suggested by ChenLiang Xu.