При помощи такого кода генерятся элементы

Код:
? s=0;forprime(p=2,2000,s+=(-1)^(p\Pi);print1(s,", "))
1, 2, 1, 2, 1, 2, 1, 2, 1, 0, -1, -2, -3, -4, -3, -2, -1, -2, -3, -2, -3, -4, -3, -2, -1, 0, 1, 2, 3, 2, 3, 2, 1, 2, 1, 2, 1, 0, -1, -2, -1, -2, -1, -2, -1, -2, -3, -2, -1, 0, 1, 2, 3, 2, 1, 0, -1, 0, 1, 0, 1, 0, -1, 0, -1, 0, -1, -2, -1, -2, -1, 0, 1, 2, 3, 2, 1, 2, 1, 2, 1, 2, 1, 0, -1, -2, -1, -2, -1, -2, -1, 0, -1, 0, 1, 2, 3, 2, 3, 4, 5, 4, 3, 2, 1, 0, 1, 2, 3, 2, 1, 0, 1, 0, 1, 2, 3, 2, 1, 0, 1, 2, 1, 0, -1, -2, -3, -2, -3, -4, -5, -4, -5, -4, -3, -2, -1, 0, -1, -2, -1, -2, -3, -4, -5, -6, -7, -6, -7, -6, -7, -6, -7, -6, -5, -6, -5, -6, -5, -6, -7, -8, -9, -10, -9, -8, -9, -10, -11, -10, -9, -8, -7, -6, -5, -6, -5, -6, -5, -4, -3, -4, -5, -6, -7, -8, -9, -10, -11, -10, -11, -10, -9, -10, -11, -12, -11, -10, -11, -12, -13, -14, -15, -16, -15, -14, -15, -14, -13, -12, -11, -10, -9, -8, -9, -8, -7, -8, -9, -10, -11, -12, -11, -10, -9, -8, -7, -6, -5, -6, -5, -4, -3, -4, -3, -4, -5, -6, -7, -6, -5, -6, -7, -8, -7, -6, -5, -4, -3, -4, -3, -4, -5, -4, -5, -6, -7, -8, -9, -10, -11, -10, -11, -10, -9, -8, -9, -10, -9, -10, -9, -8, -9, -10, -11, -12, -11, -12, -13, -12, -11, -10, -11, -10, -9, -10, -9, -10, -9, -10, -11, -12, -11, -10, -11, -10, -11, -10, -11, -10, -9, -10, -9,
Теперь в этой последовательноси нужно выделять числа перехода, как описал выше. Как это сделать в коде?