A160613 Numerator of Laguerre(n, -3).

1, 4, 23, 28, 491, 1249, 19223, 15476, 3515161, 1512661, 14496817, 228800107, 11770539419, 60428965661, 5262254717509, 2521163372543, 976843770850217, 887131806309703, 73511154681979031, 255777165814872577

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..480

Mathematica

Numerator[Table[LaguerreL[n, -3], {n, 0, 50}]] (* G. C. Greubel, May 09 2018 *)

Prog

(PARI) for(n=0, 30, print1(numerator(sum(k=0, n, binomial(n, k)*(3^k/k!))), ", ")) \\ G. C. Greubel, May 09 2018
(Magma) [Numerator((&+[Binomial(n, k)*(3^k/Factorial(k)): k in [0..n]])): n in [0..30]]; // G. C. Greubel, May 09 2018

Crossrefs

For denominators see A160614.

Cf. A277382.

Sequence in context: A258024 A258203 A293698 * A131545 A030716 A169599

Adjacent sequences: A160610 A160611 A160612 * A160614 A160615 A160616

Keyword

nonn,frac

Author

N. J. A. Sloane, Nov 14 2009

Status

approved