login
6-section a(6n+k) gives k-th differences of a for k=0..5 with a(n)=0 for n<5 and a(5)=1.
8

%I #10 Jan 27 2014 11:19:20

%S 0,0,0,0,0,1,0,0,0,0,1,-5,0,0,0,1,-4,10,0,0,1,-3,6,-10,0,1,-2,3,-4,5,

%T 1,-1,1,-1,1,0,0,0,0,0,1,-10,0,0,0,1,-9,35,0,0,1,-8,26,-60,0,1,-7,18,

%U -34,55,1,-6,11,-16,21,-25,-5,5,-5,5,-4,-4,0,0,0,1

%N 6-section a(6n+k) gives k-th differences of a for k=0..5 with a(n)=0 for n<5 and a(5)=1.

%H Alois P. Heinz, <a href="/A229656/b229656.txt">Table of n, a(n) for n = 0..10000</a>

%F a(6*n+k) = Sum_{j=0..k} (-1)^j * C(k,j) * a(n+k-j) for k=0..5.

%p a:= proc(n) option remember; local m, q;

%p m:= irem(n, 6, 'q'); `if`(n<6, `if`(n=5, 1, 0),

%p add(a(q+m-j)*(-1)^j*binomial(m, j), j=0..m))

%p end:

%p seq(a(n), n=0..100);

%Y Cf. A005590, A229653, A229654, A229655, A229657, A229658, A229659, A229660.

%K sign,eigen,look

%O 0,12

%A _Alois P. Heinz_, Sep 27 2013