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.

A282627 Exponential expansion of the square of the real root y = y(x) of y^3 - 3*x*y - 1.

This page as a plain text file.
%I A282627 #14 Sep 08 2022 08:46:18
%S A282627 1,2,2,-4,0,80,-560,0,49280,-582400,0,117286400,-1947545600,0,
%T A282627 701372672000,-14996101120000,0,8461359915008000,-221282468126720000,
%U A282627 0,180057738991370240000,-5567466898068275200000,0,6171659061668206346240000,-220248990487580966912000000,0
%N A282627 Exponential expansion of the square of the real root y = y(x) of y^3 - 3*x*y - 1.
%C A282627 See a comment on A282626 on Ramanujan's Master theorem (B) for definite integral, and the Hardy reference.
%C A282627 This is the exponential (aka binomial) convolution of A282626.
%H A282627 G. C. Greubel, <a href="/A282627/b282627.txt">Table of n, a(n) for n = 0..400</a>
%F A282627 a(n) = 2*Product_{j=1..n-1}(n + 2 - 3*j), n >= 1, (empty product = 1) and a(0) = 1.
%F A282627 E.g.f.: Square of the e.g.f. of A282626 =
%F A282627   2*x + ((1 + sqrt(1-4*x^3))/2)^(2/3) + ((1 - sqrt(1-4*x^3))/2)^(2/3).
%t A282627 Table[If[n==0,1,2*Product[n+2-3*j, {j,1,n-1}]], {n,0,25}] (* _G. C. Greubel_, Mar 29 2019 *)
%o A282627 (PARI) vector(25, n, n--; if(n==0,1,2*prod(j=1,n-1, (n+2-3*j)))) \\ _G. C. Greubel_, Mar 29 2019
%o A282627 (Magma) [1,2] cat [2*(&*[n+2-3*j: j in [1..(n-1)]]): n in [2..25]]; // _G. C. Greubel_, Mar 29 2019
%o A282627 (Sage) [1] + [2*product(n+2-3*j for j in (1..(n-1))) for n in (1..25)] # _G. C. Greubel_, Mar 29 2019
%Y A282627 Cf. A282626.
%K A282627 sign,easy
%O A282627 0,2
%A A282627 _Wolfdieter Lang_, Mar 04 2017
%E A282627 Terms a(21) onward added by _G. C. Greubel_, Mar 30 2019