login
Numbers == 0,2,5,9 modulo 10.
0

%I #10 Mar 07 2018 17:00:24

%S 0,2,5,9,10,12,15,19,20,22,25,29,30,32,35,39,40,42,45,49,50,52,55,59,

%T 60,62,65,69,70,72,75,79,80,82,85,89,90,92,95,99,100,102,105,109,110,

%U 112,115,119,120,122,125,129,130,132,135,139,140,142,145,149,150,152,155

%N Numbers == 0,2,5,9 modulo 10.

%F a(n) = a(n-1) + Mod[n,4] + 1; a(0)=0.

%F From _Chai Wah Wu_, Mar 07 2018: (Start)

%F a(n) = a(n-1) + a(n-4) - a(n-5) for n > 4.

%F G.f.: x*(x^3 + 4*x^2 + 3*x + 2)/(x^5 - x^4 - x + 1). (End)

%t digits=200 f[n_]:=f[n]=f[n-1]+Mod[n, 4]+1 f[0]=0; a=Table[f[n], {n, 1, digits}]

%K nonn

%O 0,2

%A _Roger L. Bagula_, Nov 24 2004

%E Better name from _Ralf Stephan_, May 15 2007