Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A067573
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A067573 Numbers such that Sigma(Phi(k))/Sigma(k) > Sigma(Phi(j))/Sigma(j) for all k > j. +0
2
2, 3, 5, 7, 13, 31, 37, 61, 181, 241, 421, 1009, 1201, 1321, 1801, 2161, 2521, 7561, 12601, 15121, 30241, 55441, 110881, 278263, 332641, 555911, 666917, 722473, 1443853, 2165407, 3607403, 4324321, 7212581, 8654539, 10817761, 21631147 (list; graph; listen)
OFFSET

1,1

MATHEMATICA

a = 0; Do[b = DivisorSigma[1, EulerPhi[n]]/DivisorSigma[1, n]; If[b > a, a = b; Print[n]], {n, 2, 10^7}]

CROSSREFS

Adjacent sequences: A067570 A067571 A067572 this_sequence A067574 A067575 A067576

Sequence in context: A063792 A103600 A071905 this_sequence A103199 A054217 A048414

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 30 2002

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified October 5 16:50 EDT 2008. Contains 144613 sequences.


AT&T Labs Research