Wrote binary_search_iterative/R