|
| |
|
|
A062796
|
|
Inverse Moebius transform of f[x]=x^x=A000312.
|
|
3
| |
|
|
1, 5, 28, 261, 3126, 46688, 823544, 16777477, 387420517, 10000003130, 285311670612, 8916100495200, 302875106592254, 11112006826381564, 437893890380862528, 18446744073726329093, 827240261886336764178
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Nick Hobson, Table of n, a(n) for n = 1..200
|
|
|
FORMULA
| a(n)=Sum{d^d}, d|n
G.f.: Sum_{n>=1} n^n * x^n/(1 - x^n). [From Paul D. Hanna (pauldhanna(AT)juno.com), Oct 27 2009]
|
|
|
EXAMPLE
| n=6, divisors={1,2,3,6} 1^1+2^2+3^3+6^6=1+4+27+46656=46688=a(6)
|
|
|
PROG
| (PARI) vector(17, n, sumdiv(n, d, d^d))
(PARI) {a(n)=polcoeff(sum(m=1, n, m^m*x^m/(1-x^m +x*O(x^n))), n)} [From Paul D. Hanna (pauldhanna(AT)juno.com), Oct 27 2009]
|
|
|
CROSSREFS
| A000312.
Sequence in context: A121674 A116977 A163694 * A023887 A171187 A057792
Adjacent sequences: A062793 A062794 A062795 * A062797 A062798 A062799
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Jul 19 2001
|
| |
|
|
