|
Search: id:A065392
|
|
| |
|
| 1, 2, 6, 8, 12, 30, 36, 72, 126, 180, 360, 432, 660, 930, 1512, 2160, 3300, 3780, 5184, 6552, 11160, 13860, 19800, 23232, 32760, 45360, 47520, 50400, 58080, 61776, 102300, 110160, 137592, 155520, 163296, 196560, 212960, 252000, 272160, 284580
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
a=0; s=0; Do[s=EulerPhi[DivisorSigma[1, n]]; If[s>a, a=s; Print[s]], {n, 1, 1000000}]; Output is s.
|
|
CROSSREFS
|
Cf. A000010, A000203, A065391, A065389-A065394.
Sequence in context: A138639 A082473 A113462 this_sequence A030457 A054248 A038108
Adjacent sequences: A065389 A065390 A065391 this_sequence A065393 A065394 A065395
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Nov 14 2001
|
|
|
Search completed in 0.002 seconds
|
