|
Search: id:A121734
|
|
| |
|
| 483, 209, 21, 632, 650, 541, 546, 281, 666, 440, 397, 576, 18, 251, 356, 207, 532, 361, 121, 642, 288, 167, 348, 505, 561, 0, 108, 166, 97, 492, 58, 255, 632, 151, 679, 185, 141, 587, 0, 549, 459, 428, 549, 157, 559, 121, 605, 102
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Corresponding indices n are listed in A121733[n] = {184,2103,3421,3638,4342,5181,6029,6233,8323,8628,8721,9658,9905,...}.
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics. Ramanujan's Tau Function.
|
|
FORMULA
|
a(n) = mod[ A000594[ A121733[n] ], 691] = A046694[ A121733[n] ].
|
|
EXAMPLE
|
a(1) = 483 because the first pair of equal consecutive numbers in A046694[n] is A046694[184] = A046694[185] = 483.
|
|
MATHEMATICA
|
Do[f=Mod[DivisorSigma[11, n], 691]; g=Mod[DivisorSigma[11, n+1], 691]; If[f==g, Print[{n, f}]], {n, 1, 10000}]
|
|
CROSSREFS
|
Cf. A121733, A046694, A000594.
Sequence in context: A051980 A020271 A033983 this_sequence A014803 A085120 A013771
Adjacent sequences: A121731 A121732 A121733 this_sequence A121735 A121736 A121737
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Aug 18 2006
|
|
|
Search completed in 0.002 seconds
|
