|
Search: id:A055225
|
|
|
| A055225 |
|
a(n) = sum{ k divides n } (n/k)^k. |
|
+0 7
|
|
| 1, 3, 4, 9, 6, 24, 8, 41, 37, 68, 12, 258, 14, 192, 384, 593, 18, 1557, 20, 2794, 2552, 2192, 24, 16730, 3151, 8388, 20440, 35394, 30, 116474, 32, 135457, 178512, 131396, 94968, 1111035, 38, 524688, 1596560, 2530986, 42, 7280934, 44, 8403778
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Nick Hobson, Table of n, a(n) for n = 1..1000
Leroy Quet, Home Page (listed in lieu of email address)
|
|
FORMULA
|
G.f.: Sum_{n=1..inf} -ln(1 - n*x^n)/n = Sum_{n=0..inf} a(n) x^n/n. - Paul D. Hanna (pauldhanna(AT)juno.com), Aug 04 2002
G.f.: Sum_{n>0} n*x^n/(1-n*x^n). - Vladeta Jovovic (vladeta(AT)eunet.rs), Sep 02 2002
|
|
EXAMPLE
|
a(10) = 10^1 +5^2 +2^5 +1^10 = 68 because positive divisors of 10 are 1, 2, 5, 10.
|
|
PROGRAM
|
(PARI) vector(44, n, sumdiv(n, d, (n/d)^d))
|
|
CROSSREFS
|
Sequence in context: A083111 A132065 A157020 this_sequence A054791 A167531 A062319
Adjacent sequences: A055222 A055223 A055224 this_sequence A055226 A055227 A055228
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Jun 20 2000
|
|
EXTENSIONS
|
More terms from James A. Sellers (sellersj(AT)math.psu.edu), Jul 04 2000
Duplicate g.f. removed by Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Sep 01 2009
|
|
|
Search completed in 0.002 seconds
|