The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A138279 Last digit of A136324. After 0, 1, period 4: repeat [1, 2, 5, 6] = A131800. 0
 0, 1, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6, 1, 2, 5, 6 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,4 LINKS Index entries for linear recurrences with constant coefficients, signature (0,0,0,1). FORMULA a(n) = (1/6)*{-(n mod 4)+2*[(n+1) mod 4]+11*[(n+2) mod 4]+2*[(n+3) mod 4]}-5*{C(2*n,n) mod 2}-5*{C((n+1)^2,n+3) mod 2}. - Paolo P. Lava, May 07 2008 From Wesley Ivan Hurt, Jul 08 2016: (Start) G.f.: (x+x^2+2*x^3+5*x^4+5*x^5)/(1-x^4). a(n) = a(n-4) for n>5. a(n) = (7 - I^(2*n) + (2 + 2*I)*I^(-n) + (2 - 2*I)*I^n)/2 for n>1. (End) MAPLE 0, 1, seq(op([1, 2, 5, 6]), n=0..50); # Wesley Ivan Hurt, Jul 08 2016 MATHEMATICA PadRight[{0, 1}, 120, {5, 6, 1, 2}] (* Harvey P. Dale, Jul 14 2014 *) PROG (PARI) a(n)=if(n>1, [6, 1, 2, 5][n%4+1], n) (PARI) concat(0, Vec((x+x^2+2*x^3+5*x^4+5*x^5)/(1-x^4) + O(x^99))) \\ Altug Alkan, Jul 08 2016 (MAGMA) [0, 1] cat &cat [[1, 2, 5, 6]^^30]; // Wesley Ivan Hurt, Jul 08 2016 CROSSREFS Cf. A131800, A136324. Sequence in context: A011037 A111987 A004650 * A131800 A086038 A200136 Adjacent sequences:  A138276 A138277 A138278 * A138280 A138281 A138282 KEYWORD nonn,easy,base AUTHOR Paul Curtz, May 06 2008 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified February 21 04:52 EST 2020. Contains 332086 sequences. (Running on oeis4.)