|
%I #10 Sep 08 2022 08:45:45
%S 1,1,1,3,1,3,9,21,63,567,63,6237,18711,81081,1702701,464373,1702701,
%T 86837751,71049069,549972423,14849255421,23987258757,1143392667417,
%U 78894094051773,236682282155319,78894094051773,279715424365377
%N Denominator of Laguerre(n, 10).
%H G. C. Greubel, <a href="/A160654/b160654.txt">Table of n, a(n) for n = 0..500</a>
%t Denominator[Table[LaguerreL[n, 10], {n, 0, 50}]] (* _G. C. Greubel_, May 02 2018 *)
%o (PARI) for(n=0,30, print1(denominator(sum(k=0,n, binomial(n,k)*((-10)^k/k!))), ", ")) \\ _G. C. Greubel_, May 08 2018
%o (Magma) [Denominator((&+[Binomial(n,k)*((-10)^k/Factorial(k)): k in [0..n]])): n in [0..30]]; // _G. C. Greubel_, May 08 2018
%Y For numerators see A160653.
%K nonn,frac
%O 0,4
%A _N. J. A. Sloane_, Nov 14 2009
|
