|
%I #14 Sep 08 2022 08:45:45
%S 1,0,-1,-2,-5,-7,-37,-17,887,1405,168919,958271,3086837,122693929,
%T 559876951,15779421743,337767590383,1531923385313,11912361112367,
%U -6819537030283,-21032925955607701,-313699426574980519,-16703816669710968821,-212752402370938916881
%N Numerator of Laguerre(n, 1).
%H G. C. Greubel, <a href="/A160621/b160621.txt">Table of n, a(n) for n = 0..450</a>
%F Numerators of coefficients in expansion of exp(-x/(1 - x))/(1 - x). - _Ilya Gutkovskiy_, Aug 29 2018
%e 1, 0, -1/2, -2/3, -5/8, -7/15, -37/144, -17/420, 887/5760, 1405/4536, 168919/403200, 958271/1995840, ... = A160621/A160622.
%t Numerator/@LaguerreL[Range[0,30],1] (* _Harvey P. Dale_, May 01 2011 *)
%o (PARI) for(n=0,30, print1(numerator(sum(k=0,n, binomial(n,k)*((-1)^k/k!))), ", ")) \\ _G. C. Greubel_, May 06 2018
%o (Magma) [Numerator((&+[Binomial(n,k)*((-1)^k/Factorial(k)): k in [0..n]])): n in [0..30]]; // _G. C. Greubel_, May 06 2018
%Y For denominators see A160622.
%Y Cf. A009940.
%K sign,frac
%O 0,4
%A _N. J. A. Sloane_, Nov 14 2009
|
