A160615 Numerator of Laguerre(n, -2).
1, 3, 7, 43, 27, 719, 3661, 13991, 66769, 133261, 2363513, 116441047, 513267739, 153434147, 96790969339, 2053217625931, 136839921293, 67725860135459, 837687671342383, 7232743280136193, 2996031500521181, 4142815387557270467
Offset: 0
Examples
1, 3, 7, 43/3, 27, 719/15, 3661/45, 13991/105, 66769/315, 133261/405, 2363513/4725, 116441047/155925, ...
Links
- G. C. Greubel, Table of n, a(n) for n = 0..494
Programs
-
Magma
[Numerator((&+[Binomial(n,k)*(2^k/Factorial(k)): k in [0..n]])): n in [0..30]]; // G. C. Greubel, May 06 2018
-
Mathematica
Numerator[Table[LaguerreL[n, -2], {n, 0, 50}]] (* G. C. Greubel, May 06 2018 *)
-
PARI
for(n=0,30, print1(numerator(sum(k=0,n, binomial(n,k)*(2^k/k!))), ", ")) \\ G. C. Greubel, May 06 2018
Formula
Numerators of coefficients in expansion of exp(2*x/(1 - x))/(1 - x). - Ilya Gutkovskiy, Aug 29 2018