A158677 Period 6: repeat [3, 4, 0, 5, 6, 3].
3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0, 5, 6, 3, 3, 4, 0
Offset: 1
Links
- Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,1).
Crossrefs
Cf. A158674.
Programs
-
Magma
&cat [[3, 4, 0, 5, 6, 3]^^20]; // Wesley Ivan Hurt, Jun 23 2016
-
Maple
A158677:=n->[3, 4, 0, 5, 6, 3][(n mod 6)+1]: seq(A158677(n), n=0..100); # Wesley Ivan Hurt, Jun 23 2016
-
Mathematica
PadRight[{}, 120, {3,4,0,5,6,3}] (* Harvey P. Dale, Aug 06 2013 *)
Formula
G.f.: x*(3+4*x+5*x^3+6*x^4+3*x^5) / ((1-x)*(1+x)*(1+x+x^2)*(x^2-x+1)).
a(n) = a(n-6) for n>6.
a(n) = cos(n*Pi/6)^2 * (39 - 36*cos(n*Pi/3) + 6*cos(2*n*Pi/3) - 4*sqrt(3)*sin(n*Pi/3))/3. - Wesley Ivan Hurt, Jun 23 2016
Extensions
Edited and extended by R. J. Mathar, Sep 07 2009
Comments