cp's OEIS Frontend

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.

A140430 Period 6: repeat [3, 2, 4, 1, 2, 0].

This page as a plain text file.
%I A140430 #44 Dec 12 2023 09:36:57
%S A140430 3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,
%T A140430 2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2,
%U A140430 4,1,2,0,3,2,4,1,2,0,3,2,4,1,2,0,3,2
%N A140430 Period 6: repeat [3, 2, 4, 1, 2, 0].
%C A140430 Associate to sequence identical to half its p-th differences.
%C A140430 Corresponding n-th differences table:
%C A140430     3,   2,   4,   1,   2,   0,   3;
%C A140430    -1,   2,  -3,   1,  -2,   3,  -1;
%C A140430     3,  -5,   4,  -3,   5,  -4,   3;
%C A140430    -8,   9,  -7,   8,  -9,   7,  -8;
%C A140430    17, -16,  15, -17,  16, -15,  17;
%C A140430   -33,  31, -32,  33, -31,  32, -33;
%C A140430    64, -63,  65, -64,  63, -65,  64;
%C A140430 Note that the main diagonal is 3 followed by A000079(n+1).
%C A140430 Note also the southeast diagonal 4, 1, 5, 7, 17 is 4 followed by A014551(n+1).
%C A140430 Note also 3*A001045(n+1), one signed and one unsigned, in two southeast diagonals.
%C A140430 Starting from second line, the first column is A130750 signed.
%C A140430 Starting from second line, the second column is A130752 signed.
%C A140430 Starting from second line, the third column is A130755 signed.
%H A140430 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,-1,1).
%F A140430 From _Wesley Ivan Hurt_, Aug 29 2014: (Start)
%F A140430 G.f.: (3-x+2*x^2)/((1-x)*(1+x^3)).
%F A140430 a(n) = a(n-1)-a(n-3)+a(n-4);
%F A140430 a(n) = 2 + ((-n-2) mod 3) * (-1)^n. (End)
%F A140430 a(n) = (6 + 3*cos(n*Pi) + 2*sqrt(3)*sin(n*Pi/3))/3. - _Wesley Ivan Hurt_, Jun 20 2016
%p A140430 A140430:=n->2+((-n-2) mod 3)*(-1)^n: seq(A140430(n), n=0..100); # _Wesley Ivan Hurt_, Aug 29 2014
%t A140430 CoefficientList[Series[(3 - x + 2 x^2)/((1 - x)*(1 + x^3)), {x, 0, 30}], x] (* _Wesley Ivan Hurt_, Aug 29 2014 *)
%t A140430 PadRight[{},120,{3,2,4,1,2,0}] (* _Harvey P. Dale_, Jan 21 2023 *)
%o A140430 (PARI) a(n)=[3,2,4,1,2,0][n%6+1] \\ _Charles R Greathouse IV_, Jun 02 2011
%o A140430 (Magma) [2 + ((-n-2) mod 3)*(-1)^n : n in [0..100]]; // _Wesley Ivan Hurt_, Aug 29 2014
%Y A140430 Cf. A000079 (2^n), A001045 (Jacobsthal), A014551 (Jacobsthal-Lucas).
%Y A140430 Cf. A130750, A130752, A130755.
%K A140430 nonn,easy
%O A140430 0,1
%A A140430 _Paul Curtz_, Jun 25 2008
%E A140430 More terms from _Wesley Ivan Hurt_, Aug 29 2014