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.

A119633 a(n) = (A046717(n))^3.

This page as a plain text file.
%I A119633 #27 Aug 11 2019 01:03:10
%S A119633 1,125,2197,68921,1771561,48627125,1305751357,35319837041,
%T A119633 953054410321,25737699078125,694870802988517,18761935323400361,
%U A119633 506568440928284281,13677382220238009125,369289011109685057677,9970806079491650694881,269211739130501631841441
%N A119633 a(n) = (A046717(n))^3.
%H A119633 Colin Barker, <a href="/A119633/b119633.txt">Table of n, a(n) for n = 1..600</a>
%H A119633 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (20,210,-540,-729).
%F A119633 G.f.: x*(1 + 105*x - 513*x^2 - 729*x^3) / ((1 + x)*(1 - 3*x)*(1 + 9*x)*(1 - 27*x)). - _R. J. Mathar_, Sep 09 2008
%F A119633 a(n) = ((-1)^n + 3^(1+n) + (-1)^n*3^(1+2*n) + 27^n) / 8 for n>0. - _Colin Barker_, Dec 23 2017
%e A119633 a(3) = 2197 = 13^3 = (A046717(a))^3.
%t A119633 Rest@ Nest[Append[#, 2 #[[-1]] + 3 #[[-2]]] &, {1, 1}, 15]^3 (* or *)
%t A119633 Rest@ CoefficientList[Series[x (1 + 105 x - 513 x^2 - 729 x^3)/((1 + 9 x) (1 - 3 x) (1 - 27 x) (1 + x)), {x, 0, 16}], x] (* _Michael De Vlieger_, Dec 22 2017 *)
%o A119633 (PARI) Vec(x*(1 + 105*x - 513*x^2 - 729*x^3) / ((1 + x)*(1 - 3*x)*(1 + 9*x)*(1 - 27*x)) + O(x^40)) \\ _Colin Barker_, Dec 23 2017
%Y A119633 Cf. A046717, A120096.
%K A119633 nonn,easy
%O A119633 1,2
%A A119633 _Gary W. Adamson_, Jun 09 2006
%E A119633 Entry revised by _N. J. A. Sloane_, Aug 11 2019