This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A138279 #19 Dec 12 2023 08:42:21 %S A138279 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, %T A138279 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, %U A138279 5,6,1,2,5,6,1,2,5,6,1,2,5,6,1,2,5,6 %N A138279 Last digit of A136324. After 0, 1, period 4: repeat [1, 2, 5, 6] = A131800. %H A138279 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,1). %F A138279 From _Wesley Ivan Hurt_, Jul 08 2016: (Start) %F A138279 G.f.: (x+x^2+2*x^3+5*x^4+5*x^5)/(1-x^4). %F A138279 a(n) = a(n-4) for n>5. %F A138279 a(n) = (7 - I^(2*n) + (2 + 2*I)*I^(-n) + (2 - 2*I)*I^n)/2 for n>1. (End) %p A138279 0,1,seq(op([1, 2, 5, 6]), n=0..50); # _Wesley Ivan Hurt_, Jul 08 2016 %t A138279 PadRight[{0,1}, 120, {5,6,1,2}] (* _Harvey P. Dale_, Jul 14 2014 *) %o A138279 (PARI) a(n)=if(n>1,[6,1,2,5][n%4+1],n) %o A138279 (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 %o A138279 (Magma) [0,1] cat &cat [[1, 2, 5, 6]^^30]; // _Wesley Ivan Hurt_, Jul 08 2016 %Y A138279 Cf. A131800, A136324. %K A138279 nonn,easy,base %O A138279 0,4 %A A138279 _Paul Curtz_, May 06 2008