|
|
A078619
|
|
Floor(average of first n factorials).
|
|
0
|
|
|
1, 1, 3, 8, 30, 145, 844, 5779, 45457, 403791, 3995883, 43579692, 519229008, 6709162022, 93440175754, 1395274532769, 22235989448253, 376688084797128, 6759236101851595, 128066374705591015, 2554869984086726681, 53529681701974042741, 1175203032014278503491
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|