Search: id:A003048 Results 1-1 of 1 results found. %I A003048 %S A003048 1,2,3,10,39,196,1175,8226,65807,592264,5922639,65149030, %T A003048 781788359,10163248668,142285481351,2134282220266,34148515524255, %U A003048 580524763912336,10449445750422047,198539469258018894 %N A003048 a(n+1)=n*a(n)-(-1)^n. %F A003048 E.g.f.: (2-exp(-x))/(1-x) (if offset 0). %F A003048 a(n+2)=n(a(n)+a(n+1)) for n>0. - Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Oct 05 2002 %p A003048 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 %t A003048 a[0] = 1; a[p_] := p*a[p - 1] -(-1)^p; a /@ Range[0, 19] - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 29 2007 %o A003048 (PARI) a(n)=if(n<2,n>0,(n-1)*a(n-1)+(-1)^n) %o A003048 (PARI) a(n)=if(n<1,0,(n-1)!*polcoeff((2-exp(-x+O(x^n)))/(1-x),n-1)) %Y A003048 a(n)=(n-1)!+A002467(n), n>0. %Y A003048 Sequence in context: A141102 A144720 A164933 this_sequence A008980 A064183 A050381 %Y A003048 Adjacent sequences: A003045 A003046 A003047 this_sequence A003049 A003050 A003051 %K A003048 nonn %O A003048 1,2 %A A003048 N. J. A. Sloane (njas(AT)research.att.com). Search completed in 0.001 seconds