sequence of even numbers in r repeating twice