%I #16 Jun 24 2022 09:29:51
%S 80,120,160,168,195,208,255,260,264,272,280,312,320,336,340,360,390,
%T 400,408,416,420,435,440,456,464,510,528,552,555,580,592,595,600,615,
%U 616,640,656,660,663,672,696,697,715,740,744,760,765,792,795,800,820
%N Numbers k such that Euler phi(k) / Carmichael lambda(k) = 8.
%C Solutions to A000010(n)/A002322(n)=8.
%H Amiram Eldar, <a href="/A062376/b062376.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])) }
%o {cl(f)= k=factor(f); l=1; for(x=1,omega(f),l=lcm(l,cmf([k[x,1], k[x,2]]))); l }
%o {A062376(n)=eulerphi(n)/cl(n)}
%o for(x=1,1000, if(A062376(x)==8, print1(x,", ")))
%Y Cf. A000010, A002322, A034380, A033948, A062373, A062374, A062375, A062377.
%K easy,nonn
%O 1,1
%A _Vladeta Jovovic_, Jun 17 2001
%E More terms from _Randall L Rathbun_, Jan 12 2002
|