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.

A122006 Expansion of x^2*(1-x)/((1-3*x)*(1-3*x^2)).

This page as a plain text file.
%I A122006 #19 Aug 20 2024 14:48:18
%S A122006 0,1,2,9,24,81,234,729,2160,6561,19602,59049,176904,531441,1593594,
%T A122006 4782969,14346720,43046721,129133602,387420489,1162241784,3486784401,
%U A122006 10460294154,31381059609,94143001680,282429536481,847288078002,2541865828329,7625595890664
%N A122006 Expansion of x^2*(1-x)/((1-3*x)*(1-3*x^2)).
%C A122006 Limit(n->infinity) a(n+1)/a(n)=3.
%C A122006 The sequence can be created by multiplying the n-th power of the matrix [[0,1,2],[1,2,0],[2,0,1]], multiplying from the right with the vector [1,0,0] and taking the middle element of the resulting vector.
%D A122006 Alain M. Robert, "Linear Algebra, Examples and Applications", World Scientific, 2005, p. 58.
%H A122006 Colin Barker, <a href="/A122006/b122006.txt">Table of n, a(n) for n = 1..1000</a>
%H A122006 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,3,-9).
%F A122006 a(n) = 3*a(n-1) + 3*a(n-2) - 9*a(n-3). - _Philippe Deléham_, Mar 09 2009
%F A122006 From _Colin Barker_, Sep 23 2016: (Start)
%F A122006 a(n) = 3^(n-2) for n even.
%F A122006 a(n) = 3^(n-2)-3^((n-3)/2) for n odd. (End)
%t A122006 M = {{0, 1, 2}, {1, 2, 0}, {2, 0, 1}} v[1] = {1, 0, 0} v[n_] := v[n] = M.v[n - 1] a1 = Table[v[n][[2]], {n, 1, 50}]
%t A122006 Rest[CoefficientList[Series[x^2(1-x)/((1-3x)(1-3x^2)),{x,0,30}],x]] (* or *) LinearRecurrence[{3,3,-9},{0,1,2},30] (* _Harvey P. Dale_, Aug 20 2024 *)
%o A122006 (PARI) concat(0, Vec(x^2*(1-x)/((1-3*x)*(1-3*x^2)) + O(x^40))) \\ _Colin Barker_, Sep 23 2016
%Y A122006 Cf. A007179.
%K A122006 nonn,easy
%O A122006 1,3
%A A122006 _Roger L. Bagula_ and _Gary W. Adamson_, Sep 11 2006