%I #21 Dec 12 2023 09:37:49
%S 8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,
%T 4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,
%U 0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8,7,4,1,0,1,4,7,8
%N Periodic sequence (8, 7, 4, 1, 0, 1, 4, 7).
%C Fourth column of triangular array T defined in A131074.
%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,-1,1).
%F a(1) = 8, a(2) = a(8) = 7, a(3) = a(7) = 4, a(4) = a(6) = 1, a(5) = 0; for n > 8, a(n) = a(n-8).
%F G.f.: (8-x-3*x^2-3*x^3+7*x^4)/((1-x)*(1+x^4)).
%t PadRight[{},120,{8,7,4,1,0,1,4,7}] _Harvey P. Dale_, May 20 2012
%o (PARI) {m=105; for(n=1, m, r=(n-1)%8; print1(if(r==0, 8, if(r==1||r==7, 7, if(r==2||r==6, 4, if(r==4, 0, 1)))), ","))}
%o (Magma) m:=105; [ [8, 7, 4, 1, 0, 1, 4, 7][(n-1) mod 8 + 1]: n in [1..m] ];
%Y Cf. A131074, A131028.
%K nonn,easy,less
%O 1,1
%A _Klaus Brockhaus_, following a suggestion of _Paul Curtz_, Jun 14 2007
|