login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A201950 Central coefficients in Product_{k=0..n-1} (1 + k*x + x^2). 8
1, 0, 2, 6, 28, 160, 1078, 8358, 73260, 716112, 7721844, 91039740, 1164932470, 16077368580, 238037983558, 3763371442530, 63276351409092, 1127406030014112, 21218146474666864, 420611921077524912, 8759617763834095796, 191208185756772875880 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Vaclav Kotesovec, Table of n, a(n) for n = 0..300

FORMULA

Central terms of rows in irregular triangle A201949.

a(n) = (n-1)*a(n-1) + 2*A201952(n-2) for n>0.

E.g.f.: BesselI(0, 2*log(1 - x)). - Ilya Gutkovskiy, Feb 22 2019

E.g.f.: Sum_{n>=0} log(1 - x)^(2*n) / n!^2. [After Ilya Gutkovskiy - Paul D. Hanna, Feb 24 2019]

EXAMPLE

The coefficients in Product_{k=0..n-1} (1+k*x+x^2) form triangle A201949:

(1);

1,(0), 1;

1, 1,(2), 1, 1;

1, 3, 5, (6), 5, 3, 1;

1, 6, 15, 24, (28), 24, 15, 6, 1;

1, 10, 40, 90, 139, (160), 139, 90, 40, 10, 1;

1, 15, 91, 300, 629, 945, (1078), 945, 629, 300, 91, 15, 1;

1, 21, 182, 861, 2520, 5019, 7377, (8358), 7377, 5019, 2520, 861, 182, 21, 1;

1, 28, 330, 2156, 8729, 23520, 45030, 65016, (73260), 65016, 45030, 23520, 8729, 2156, 330, 28, 1; ...

where coefficients in parenthesis form the initial terms of this sequence.

MATHEMATICA

Flatten[{1, Table[Coefficient[Expand[Product[1 + k*x + x^2, {k, 0, n-1}]], x^n], {n, 1, 20}]}] (* Vaclav Kotesovec, Feb 10 2015 *)

PROG

(PARI) {a(n) = polcoeff( prod(k=1, n, 1+(k-1)*x+x^2+x*O(x^n)), n)}

for(n=0, 30, print1(a(n), ", "))

(PARI) /* From series BesselI(0, 2*log(1 - x)), after Ilya Gutkovskiy */

{a(n) = n!*polcoeff( sum(m=0, n, log(1 - x +x*O(x^n))^(2*m)/m!^2), n)}

for(n=0, 30, print1(a(n), ", ")) \\ Paul D. Hanna, Feb 24 2019

CROSSREFS

Cf. A201949, A201951, A201952, A201953.

Cf. A324304 (variant).

Sequence in context: A277381 A184695 A086633 * A109570 A262002 A245633

Adjacent sequences:  A201947 A201948 A201949 * A201951 A201952 A201953

KEYWORD

nonn

AUTHOR

Paul D. Hanna, Dec 06 2011

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 26 17:32 EDT 2020. Contains 338027 sequences. (Running on oeis4.)