|
|
A062363
|
|
a(n) = Sum_{d|n} d!.
|
|
15
|
|
|
0, 1, 3, 7, 27, 121, 729, 5041, 40347, 362887, 3628923, 39916801, 479002353, 6227020801, 87178296243, 1307674368127, 20922789928347, 355687428096001, 6402373706091609, 121645100408832001, 2432902008180268947
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
L.g.f.: -log(Product_{k>=1} (1 - x^k)^((k-1)!)) = Sum_{n>=1} a(n)*x^n/n. - Ilya Gutkovskiy, May 23 2018
|
|
EXAMPLE
|
The divisors of 3 are 1 and 3 so 1! + 3! = 7. The divisors of 4 are 1, 2 and 4 so 1! + 2! + 4! = 27.
|
|
MATHEMATICA
|
nmax=20; CoefficientList[Series[Sum[m!*x^m/(1-x^m), {m, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Mar 14 2015 *)
|
|
PROG
|
(PARI) a(n)=if(n<1, 0, sumdiv(n, d, d!));
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|