A082427 a(1)=1, a(n) = n*(Sum_{k=1..n-1} a(k)) - 2.

1, 0, 1, 6, 38, 274, 2238, 20462, 207178, 2301978, 27853934, 364633318, 5135252562, 77423807858, 1244311197718, 21236244441054, 383579665216538, 7310577148832842, 146617686151591998, 3086688129507199958, 68061473255633759074, 1568654907415559018658

Offset

1,4

Links

Table of n, a(n) for n=1..22.

Formula

a(n) = floor(n*(11/2 - 2*e)*n!) for n >= 2.

a(n) = (n+2)*a(n-1) - (n-1)*a(n-2), n>3. - Gary Detlefs, Jun 30 2024

Mathematica

Join[{1}, Table[Floor[n(11/2-2E)n!], {n, 2, 20}]] (* Harvey P. Dale, May 09 2013 *)

Crossrefs

Cf. A007808, A074143.

Sequence in context: A098410 A079949 A026940 * A192941 A263855 A354326

Adjacent sequences: A082424 A082425 A082426 * A082428 A082429 A082430

Keyword

nonn

Author

Benoit Cloitre, Apr 24 2003

Extensions

Offset changed to 1 by Georg Fischer, May 15 2024

Status

approved