|
%I #13 Jun 24 2022 05:25:25
%S 63,91,117,126,133,171,182,189,217,234,247,259,266,279,301,333,342,
%T 351,378,387,403,427,434,441,469,494,511,518,549,553,558,559,567,589,
%U 602,603,637,657,666,679,702,711,721,763,774,806,817,837,854,871,873,882
%N Euler phi(n) / Carmichael lambda(n) = 6.
%C Solutions to A000010(n)/A002322(n)=6.
%H R. J. Mathar, <a href="/A062375/b062375.txt">Table of n, a(n) for n = 1..10000</a>
%o (PARI) {cmf(f)=if( ((f[1]==2)&&(f[2]>2)),eulerphi(f[1]^f[2])/2, eulerphi(f[1]^f[2])) } {cl(f)= k=factor(f); l=1; for(x=1,omega(f),l=lcm(l,cmf([k[x,1], k[x,2]]))); l } {A062375(n)=eulerphi(n)/cl(n)} for(x=1,10001, if(A062375(x)==6,print1(x,",")))
%Y Cf. A000010, A002322, A034380, A033948, A062373, A062374, A062376, A062377.
%K easy,nonn
%O 1,1
%A _Vladeta Jovovic_, Jun 17 2001
%E More terms from _Randall L Rathbun_, Jan 12 2002
|
