%I A057635
%S A057635 2,6,0,12,0,18,0,30,0,22,0,42,0,0,0,60,0,54,0,66,0,46,0,90,0,0,0,58,0,
%T A057635 62,0,120,0,0,0,126,0,0,0,150,0,98,0,138,0,94,0,210,0,0,0,106,0,162,0,
%U A057635 174,0,118,0,198,0,0,0,240,0,134,0,0,0,142,0,270,0,0,0,0,0,158,0,330,0
%N A057635 a(n) is the largest m such that phi(m)=n, where phi is Euler's Totient 
               function.
%C A057635 To check that a property P holds for all EulerPhi(x) not exceeding n, 
               for n with a(n) > 0, it suffices to check P for all EulerPhi(x) with 
               x not exceeding a(n). - Joseph L. Pe (joseph_l_pe(AT)hotmail.com), 
               Jan 10 2002
%C A057635 The Alekseyev link in A131883 establishes the following explicit relationship 
               between A131883, A036912 and A057635. Namely, for t belonging to 
               A036912, we have t=A131883(A057635(t)-1). In other words, A036912(n) 
               = A131883(A057635(A036912(n))-1) for all n.
%H A057635 T. D. Noe, <a href="b057635.txt">Table of n, a(n) for n = 1..10000</a>
%e A057635 m=12 is the largest value of m such that phi(m)=4, so a(4)=12.
%t A057635 a(2n+1) = 0 for n > 0 and when a(2n) = 0, the Nontotients (A005277)/2 
               a = Table[0, {100}]; Do[ t = EulerPhi[n]; If[t < 101, a[[t]] = n], 
               {n, 1, 10^6}]; a
%Y A057635 Cf. A000010, A014197.
%Y A057635 Sequence in context: A156991 A065344 A131105 this_sequence A139717 A138703 
               A106458
%Y A057635 Adjacent sequences: A057632 A057633 A057634 this_sequence A057636 A057637 
               A057638
%K A057635 nonn
%O A057635 1,1
%A A057635 Jud McCranie (j.mccranie(AT)comcast.net), Oct 10 2000