|
Search: id:A069097
|
|
|
| A069097 |
|
Moebius transform of f[x]=x*sigma[x]. |
|
+0
5
|
|
| 1, 5, 11, 22, 29, 55, 55, 92, 105, 145, 131, 242, 181, 275, 319, 376, 305, 525, 379, 638, 605, 655, 551, 1012, 745, 905, 963, 1210, 869, 1595, 991, 1520, 1441, 1525, 1595, 2310, 1405, 1895, 1991, 2668, 1721, 3025, 1891, 2882, 3045, 2755, 2255, 4136, 2737
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Equals A127569 * [1, 2, 3,...] - Gary W. Adamson (qntmpkt(AT)yahoo.com), Jan 19 2007
Equals row sums of triangle A143309 [From Gary W. Adamson (qntmpkt(AT)yahoo.com), Aug 06 2008]
Equals row sums of triangle A143312 [From Gary W. Adamson (qntmpkt(AT)yahoo.com), Aug 06 2008]
|
|
FORMULA
|
a(n) = Sum_{d|n} d^2*phi(n/d). - Vladeta Jovovic (vladeta(AT)eunet.rs), Jul 31 2002
a(n) = Sum_{k=1..n} gcd(n, k)^2. - Vladeta Jovovic (vladeta(AT)eunet.rs), Aug 27 2003
|
|
PROGRAM
|
(PARI) for(n=1, 100, print1((sumdiv(n, k, k*sigma(k)*moebius(n/k))), ", "))
|
|
CROSSREFS
|
Cf. A033457, A068963.
Cf. A127569.
Cf. A143309, A143312. [From Gary W. Adamson (qntmpkt(AT)yahoo.com), Aug 06 2008]
Sequence in context: A166863 A163704 A131898 this_sequence A024921 A152533 A161896
Adjacent sequences: A069094 A069095 A069096 this_sequence A069098 A069099 A069100
|
|
KEYWORD
|
easy,nonn,mult
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Apr 05 2002
|
|
|
Search completed in 0.002 seconds
|
