login
Eight steps forward, seven steps back.
3

%I #5 May 31 2017 22:57:46

%S 0,1,2,3,4,5,6,7,8,7,6,5,4,3,2,1,2,3,4,5,6,7,8,9,8,7,6,5,4,3,2,3,4,5,

%T 6,7,8,9,10,9,8,7,6,5,4,3,4,5,6,7,8,9,10,11,10,9,8,7,6,5,4,5,6,7,8,9,

%U 10,11,12,11,10,9,8,7,6,5,6,7,8,9,10,11

%N Eight steps forward, seven steps back.

%H <a href="/index/Rec#order_16">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,-1).

%F a(n) = Sum_{i=1..n} (-1)^floor((2*i-2)/15).

%F a(n) = a(n-1) + a(n-15) - a(n-16) for n > 15.

%p A287793:=n->add((-1)^floor((2*i-2)/15), i=1..n): seq(A287793(n), n=0..200);

%t Table[Sum[(-1)^Floor[(2 i - 2)/15], {i, n}], {n, 0, 100}]

%Y Cf. A008611 (one step back, two steps forward).

%Y Cf. A058207 (three steps forward, two steps back).

%Y Cf. A260644 (four steps forward, three steps back).

%Y Cf. A271800 (five steps forward, four steps back).

%Y Cf. A271859 (six steps forward, five steps back).

%Y Cf. A287655 (seven steps forward, six steps back).

%K nonn,easy

%O 0,3

%A _Wesley Ivan Hurt_, May 31 2017