login
A078156
A078153(n!)
4
0, 0, 0, 0, 46, 702, 7479, 97902, 1231886, 15977798, 208298944, 3085485116, 45879947392, 749485746579, 12963973882204, 236404256556347, 4415737043058504, 88721524940832020, 1830113429944169943, 40228564066847381090, 921832573196324390682
OFFSET
1,5
FORMULA
a(n) = A078153(n!) = A078162(n) - A062569(n)
MATHEMATICA
Table[Length[Union[Table[Floor[w!/j], {j, 1, w!}]]] -DivisorSigma[1, w! ], {w, 1, 9}]
KEYWORD
nonn
AUTHOR
Labos Elemer, Nov 27 2002
EXTENSIONS
Terms a(10) onward from Max Alekseyev, Feb 12 2012
STATUS
approved