%I #14 Jun 26 2018 04:57:29
%S 1,6,10,14,15,21,33,35,51,55,65,77,85,91,115,119,133,143,161,185,187,
%T 203,209,221,247,253,287,299,319,323,341,371,377,391,403,437,451,473,
%U 481,493,517,527,551,583,589,611,629,649,667,689,697,703,713,731,767
%N Numbers n such that phi(n)*mu(n) > phi(m)*mu(m) for all m < n.
%H Harry J. Smith, <a href="/A063078/b063078.txt">Table of n, a(n) for n = 1..1000</a>
%o (PARI) a=0; j=[]; for(n=1,2000,b=eulerphi(n)*moebius(n); if(b>a,a=b; j=concat(j,n))); j
%o (PARI) { n=a=0; for (m=1, 10^9, b=eulerphi(m)*moebius(m); if(b>a, a=b; write("b063078.txt", n++, " ", m); if (n==1000, break)) ) } \\ _Harry J. Smith_, Aug 17 2009
%Y Cf. A000010, A008683.
%K easy,nonn
%O 1,2
%A _Jason Earls_, Aug 05 2001