A078619 Floor(average of first n factorials).

1, 1, 3, 8, 30, 145, 844, 5779, 45457, 403791, 3995883, 43579692, 519229008, 6709162022, 93440175754, 1395274532769, 22235989448253, 376688084797128, 6759236101851595, 128066374705591015, 2554869984086726681

Offset

1,3

Links

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

Formula

a(n) = Floor((1/n)(Sum_{i=1, ..., n} i!)

Example

a(3) = Floor((1 + 2 + 6)/3) = 3.

Mathematica

s = 0; a = {}; For[i = 1, i <= 30, i++, s = s + i!; a = Append[a, Floor[(1/i) s]]]; a

Crossrefs

Sequence in context: A349426 A059171 A261766 * A274934 A066304 A298456

Adjacent sequences: A078616 A078617 A078618 * A078620 A078621 A078622

Keyword

easy,nonn

Author

Joseph L. Pe, Dec 10 2002

Status

approved