R based tabu search algorithm