%I #18 Mar 12 2024 13:09:57
%S 0,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,
%T 2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,
%U 4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4,3,2,1,9,8,7,6,5,4
%N Digital root of 8n.
%C Period of 9. - _Robert G. Wilson v_, Sep 20 2010
%C Essentially the same as A138531. - _R. J. Mathar_, Jul 09 2011
%H <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,0,0,0,1).
%F G.f.: -x*(9*x^8+x^7+2*x^6+3*x^5+4*x^4+5*x^3+6*x^2+7*x+8)/((x-1)*(x^2+x+1)*(x^6+x^3+1)). - _Colin Barker_, Aug 19 2012
%t f[n_] := Mod[8 n - 1, 9] + 1; f[0] = 0; Array[f, 105, 0] (* _Robert G. Wilson v_, Sep 20 2010 *)
%Y Cf. A007953, A010888, A180592 - A180599.
%K easy,nonn,base
%O 0,2
%A _Odimar Fabeny_, Sep 10 2010
%E More terms from _Robert G. Wilson v_, Sep 20 2010