|
Search: id:A070070
|
|
|
| A070070 |
|
Rounded value of n*L_n(-1) where L is the Laguerre polynomial. |
|
+0
1
|
|
| 0, 2, 7, 17, 35, 64, 111, 182, 286, 436, 647, 938, 1336, 1871, 2583, 3520, 4741, 6320, 8347, 10930, 14199, 18312, 23460, 29869, 37808, 47600, 59624, 74331, 92250, 114006, 140329, 172077, 210249, 256010, 310717, 375943, 453513, 545538, 654453
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
MAPLE
|
a := n->round(expand(n*LaguerreL(n, -1)));
|
|
MATHEMATICA
|
a[n_] := Round[n*LaguerreL[n, 0, -1]]
|
|
PROGRAM
|
(PARI) a(n)=if(n<0, 0, round(n*polcoeff(exp(x/(1-x)+x*O(x^n))/(1-x), n)))
|
|
CROSSREFS
|
Sequence in context: A045947 A145066 A014148 this_sequence A033937 A116576 A086717
Adjacent sequences: A070067 A070068 A070069 this_sequence A070071 A070072 A070073
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Karol A. Penson (penson(AT)lptl.jussieu.fr), Apr 19 2002
|
|
EXTENSIONS
|
Additional comments from Michael Somos, Dec 04 2002
|
|
|
Search completed in 0.002 seconds
|
