Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #8 Dec 10 2024 20:01:51
%S 4,6,8,9,14,15,16,20,21,25,33,35,39,45,49,65,77,85,91,95,111,115,119,
%T 121,143,155,161,169,187,203,209,217,221,247,253,287,289,319,323,341,
%U 361,391,403,407,427,437,451,473,481,493,517,527,529,583,589,611,629
%N Composite numbers for which phi(n) >= phi(k) for all composite k from 1 to n-1.
%H Andrew Howroyd, <a href="/A067127/b067127.txt">Table of n, a(n) for n = 1..10000</a>
%e 33 is a member as phi(33)=20 which is >= the maximum phi value for composite numbers less than 33, namely phi(25)=20.
%o (PARI) lista(n)={my(L=List(), m=0); for(k=2, oo, if(!isprime(k), my(t=eulerphi(k)); if(t>=m, listput(L,k); m=t; if(#L>=n, return(Vec(L))))))} \\ _Andrew Howroyd_, Dec 10 2024
%Y Cf. A067126, A131195.
%K easy,nonn
%O 1,1
%A _Amarnath Murthy_, Jan 09 2002