|
Search: id:A003048
|
|
| |
|
| 1, 2, 3, 10, 39, 196, 1175, 8226, 65807, 592264, 5922639, 65149030, 781788359, 10163248668, 142285481351, 2134282220266, 34148515524255, 580524763912336, 10449445750422047, 198539469258018894
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
E.g.f.: (2-exp(-x))/(1-x) (if offset 0).
a(n+2)=n(a(n)+a(n+1)) for n>0. - Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Oct 05 2002
|
|
MAPLE
|
a:= proc(p) option remember; p*a(p-1)-(-1)^p end proc: a(0):= 1: seq(a(p), p=0..19); - Robert Israel, Jan 05 2008
|
|
MATHEMATICA
|
a[0] = 1; a[p_] := p*a[p - 1] -(-1)^p; a /@ Range[0, 19] - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 29 2007
|
|
PROGRAM
|
(PARI) a(n)=if(n<2, n>0, (n-1)*a(n-1)+(-1)^n)
(PARI) a(n)=if(n<1, 0, (n-1)!*polcoeff((2-exp(-x+O(x^n)))/(1-x), n-1))
|
|
CROSSREFS
|
a(n)=(n-1)!+A002467(n), n>0.
Sequence in context: A134959 A056607 A060604 this_sequence A008980 A064183 A050381
Adjacent sequences: A003045 A003046 A003047 this_sequence A003049 A003050 A003051
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
njas
|
|
|
Search completed in 0.002 seconds
|
