login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A098560 E.g.f. (1+4*x)/(1-4*x). 2
1, 8, 64, 768, 12288, 245760, 5898240, 165150720, 5284823040, 190253629440, 7610145177600, 334846387814400, 16072626615091200, 835776583984742400, 46803488703145574400, 2808209322188734464000, 179725396620079005696000 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..360

FORMULA

a(n) = 2*4^n*n! - 0^n.

a(n+1) = 8*A034177(n).

a(n) - 4*n*a(n-1) = 0. - R. J. Mathar, Dec 21 2014

MATHEMATICA

s=2; lst={1}; Do[s+=n*s+s; AppendTo[lst, s], {n, 2, 5!, 4}]; lst (* Vladimir Joseph Stephan Orlovsky, Nov 08 2008 *)

With[{nn=20}, CoefficientList[Series[(1+4x)/(1-4x), {x, 0, nn}], x] Range[0, nn]!] (* or *) Join[{1}, Table[2*4^n n!, {n, 20}]] (* Harvey P. Dale, Jan 16 2012 *)

PROG

(PARI) for(n=0, 30, print1(if(n==0, 1, 2^(2*n+1)*n!), ", ")) \\ G. C. Greubel, Jan 17 2018

(MAGMA) [1] cat [2^(2*n+1)*Factorial(n): n in [2..30]]; // G. C. Greubel, Jan 17 2018

CROSSREFS

Cf. A098559, A098558, A032184.

Sequence in context: A088038 A061435 A133054 * A087138 A293144 A111984

Adjacent sequences:  A098557 A098558 A098559 * A098561 A098562 A098563

KEYWORD

easy,nonn

AUTHOR

Paul Barry, Sep 14 2004

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 17 02:10 EDT 2019. Contains 325092 sequences. (Running on oeis4.)