A053481 First differences of A029767.

2, 11, 76, 654, 6816, 83880, 1193760, 19318320, 350622720, 7056927360, 156031142400, 3760042809600, 98093779660800, 2754553785984000, 82841868639129600, 2656672553703168000, 90498598469959680000, 3263440333591646208000

Offset: 0

Author

N. J. A. Sloane, Jan 15 2000

Keywords

• nonn

Links

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

Programs

Mathematica

a[n_] := (n - 1)! * (2^n - 1); Table[a[n+2] - a[n+1], {n,0,25}] (* G. C. Greubel, Jan 19 2017 *)

PARI

for(n=0,25, print1(( (n+1)!*(2^(n+2) -1) - n!*(2^(n+1) -1)), ", ")) \\ G. C. Greubel, Jan 19 2017

Formula

a(n) = (n+1)!*(2^(n+2) -1) - n!*(2^(n+1) -1) for n>=0. - G. C. Greubel, Jan 19 2017