|
| |
|
|
A061555
|
|
Integer part of sigma(n!)/n!.
|
|
1
| |
|
|
1, 1, 1, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=0,...,1000
|
|
|
FORMULA
| a(n)=Floor[DivisorSigma[1, n! ]/n! ]=Floor[A000203(A000142(n)]
|
|
|
EXAMPLE
| With increasing n, a(n) goes to infinity.
|
|
|
PROG
| (PARI) { for (n=0, 1000, write("b061555.txt", n, " ", sigma(n!)\n!) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jul 24 2009]
|
|
|
CROSSREFS
| A000142, A000203.
Sequence in context: A112751 A091194 A156079 * A146323 A071626 A106457
Adjacent sequences: A061552 A061553 A061554 * A061556 A061557 A061558
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), May 17 2001
|
|
|
EXTENSIONS
| Terms corrected for an offset of 0 by Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jul 24 2009
|
| |
|
|