A168037 Period length 18: repeat 0,1,2,0,8,7,0,4,5,0,5,4,0,7,8,0,2,1.
0, 1, 2, 0, 8, 7, 0, 4, 5, 0, 5, 4, 0, 7, 8, 0, 2, 1, 0, 1, 2, 0, 8, 7, 0, 4, 5, 0, 5, 4, 0, 7, 8, 0, 2, 1, 0, 1, 2, 0, 8, 7, 0, 4, 5, 0, 5, 4, 0, 7, 8, 0, 2, 1
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1).
Crossrefs
Cf. A154811.
Programs
-
Mathematica
PadRight[{},60,{0,1,2,0,8,7,0,4,5,0,5,4,0,7,8,0,2,1}] (* Harvey P. Dale, Jan 17 2021 *)
Formula
a(n) = A129194(n) mod 9.
a(n) = a(n-18).
a(n+1) = a(17-n), 0<=n<= 16, palindromic.
G.f. ( -x*(1+2*x+8*x^3+7*x^4+4*x^6+5*x^7+5*x^9+4*x^10+7*x^12+8*x^13+2*x^15+x^16) ) / ( (x-1)*(1+x+x^2)*(1+x^3+x^6)*(1+x)*(1-x+x^2)*(1-x^3+x^6) ). - R. J. Mathar, Jan 22 2011
Comments