login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A064452 Integers which are not primes or powers of primes such that for all j>i Phi(j)/j > Phi(i)/i. 0

%I #2 Mar 30 2012 17:30:35

%S 6,10,14,15,21,33,35,55,65,77,91,119,133,143,187,209,221,247,299,323,

%T 391,437,493,527,551,589,667,713,851,899,1073,1147,1189,1247,1271,

%U 1333,1457,1517,1591,1739,1763,1927,2021,2173,2279,2419,2491,2623,2747,2773

%N Integers which are not primes or powers of primes such that for all j>i Phi(j)/j > Phi(i)/i.

%t a = 0; Do[ If[ Length[ FactorInteger[n]] > 1 && EulerPhi[n]/n > a, a = EulerPhi[n]/n; Print[n]], {n, 1, 5000} ]

%K easy,nonn

%O 1,1

%A _Robert G. Wilson v_, Oct 02 2001

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 10:55 EDT 2024. Contains 371241 sequences. (Running on oeis4.)