|
Search: id:A126213
|
|
|
| A126213 |
|
a(n) = sum of the d(k)'s, where 1<=k<=n and d(k) is equal to any divisor of n, where d(k) is the number of positive divisors of k. |
|
+0 2
|
|
| 1, 3, 1, 5, 1, 10, 1, 17, 7, 9, 1, 35, 1, 13, 7, 33, 1, 33, 1, 42, 7, 17, 1, 79, 6, 19, 10, 55, 1, 59, 1, 75, 10, 23, 6, 119, 1, 25, 10, 110, 1, 66, 1, 85, 24, 29, 1, 174, 1, 46, 13, 95, 1, 108, 6, 149, 13, 33, 1, 204, 1, 37, 22, 165, 6, 109, 1, 123, 13, 61, 1, 304, 1, 43, 18, 135, 8
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
EXAMPLE
|
The number of divisors of the integers 1 through 10 form the sequence 1,2,2,3,2,4,2,4,3,4. The divisors of 10 are 1,2,5,10. The terms of the sequence of the first ten d(k)'s which equal any divisor of 10 are the five terms 1,2,2,2,2. So a(10) = 1+2+2+2+2 = 9.
|
|
MATHEMATICA
|
f[n_] := Plus @@ Select[Table[Length@Divisors[k], {k, n}], MemberQ[Divisors[n], # ] &]; Table[f[n], {n, 78}] (*Chandler*)
|
|
CROSSREFS
|
Cf. A126212.
Sequence in context: A155912 A050354 A146434 this_sequence A146935 A133730 A112031
Adjacent sequences: A126210 A126211 A126212 this_sequence A126214 A126215 A126216
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Dec 20 2006
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Dec 21 2006
|
|
|
Search completed in 0.002 seconds
|