|
Search: id:A090879
|
|
| |
|
| 1, 4, 7, 20, 21, 94, 71, 328, 457, 1194, 1035, 7052, 4109, 17294, 33807, 83984, 65553, 389650, 262163, 1484820, 1949717, 4216854, 4194327, 29409304, 22020121, 67215386, 119799835, 350453788, 268435485, 1755807774, 1073741855
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
G.f.: Sum_{m>0} m*x^m/(1-(2*x)^m).
|
|
MATHEMATICA
|
f[n_] := Block[{d = Divisors[n]}, Apply[Plus, d*2^(n - d)]]; Table[ f[n], {n, 1, 32}] (from Robert G. Wilson v Feb 16 2004)
|
|
CROSSREFS
|
Cf. A074854, A083413.
Sequence in context: A133264 A127415 A045548 this_sequence A084404 A147065 A049947
Adjacent sequences: A090876 A090877 A090878 this_sequence A090880 A090881 A090882
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Vladeta Jovovic (vladeta(AT)eunet.rs), Feb 14 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 16 2004
|
|
|
Search completed in 0.002 seconds
|
