optimization code snippets in r

solve the travelling salesman problem in r