%I #3 Mar 30 2012 17:26:16
%S 0,1,2,3,6,1,0,7,8,5,0,3,8,1,2,1,4,7,2,3,2,7,2,1,0,3,4,7,4,5,6,5,6,7,
%T 8,1,6,5,2,3,0,5,8,3,6,7,6,9,2,7,8,7,2,7,6,5,8,9,2,9,0,1,0,1,2,3,6,1,
%U 0,7,8,5,0,3,8,1,2,1,4,7,2,3,2,7,2,1,0,3,4,7,4,5,6,5,6,7,8,1,6,5,2,3,0,5,8
%N Each term is sum of three previous terms mod 10.
%C The sequence has period: {0,1,2,3,6,1,0,7,8,5,0,3,8,1,2,1,4,7,2,3,2,7,2,1,0,3,4,7,4,5,6,5,6,7,8,1,6,5,2,3,0,5,8,3,6,7,6,9,2,7,8,7,2,7,6,5,8,9,2,9,0,1} of length = 62.
%F a(n)=mod(a(n-1)+a(n-2)+a(n-3), 10); a(1)=0, a(2)=1;a(3)=2.
%t s={a=0, b=1, c=2};Do[d=Mod[a+b+c, 10];s=Append[s, d];a=b;b=c;c=d, {m, 200}];s
%K nonn
%O 0,3
%A _Zak Seidov_, May 25 2005
|