A160604 Denominator of Laguerre(n, -8).
1, 1, 1, 3, 1, 15, 45, 105, 315, 405, 525, 155925, 467775, 2027025, 42567525, 58046625, 30405375, 10854718875, 8881133625, 206239658625, 9280784638125, 17717861581875, 714620417135625, 7044115540336875, 147926426347074375
Offset: 0
Links
- G. C. Greubel, Table of n, a(n) for n = 0..500
Programs
-
Magma
[Denominator((&+[Binomial(n,k)*(8^k/Factorial(k)): k in [0..n]])): n in [0..30]]; // G. C. Greubel, May 13 2018
-
Mathematica
Denominator[Table[LaguerreL[n, -8], {n, 0, 50}]] (* G. C. Greubel, May 13 2018 *)
-
PARI
for(n=0,30, print1(denominator(sum(k=0,n, binomial(n,k)*(8^k/k!))), ", ")) \\ G. C. Greubel, May 13 2018
-
PARI
a(n) = denominator(pollaguerre(n, 0, -8)); \\ Michel Marcus, Feb 05 2021