A066696 Numbers k such that Euler phi(k) / Carmichael lambda(k) = 14.

1247, 1421, 2059, 2494, 2842, 3053, 3479, 3683, 4118, 4859, 5537, 6106, 6119, 6931, 6958, 7366, 8023, 8471, 9017, 9653, 9718, 9947, 10277, 10991, 11074, 11711, 12083, 12238, 13427, 13769, 13862, 13987, 14239, 14351, 15863, 16046, 16942

Offset: 1

Author

Randall L Rathbun, Jan 12 2002

Keywords

• easy
• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000010, A002322.

Cf. A062373, A062374, A062375, A062376, A062377.

Programs

PARI

{cmf(f)=if( ((f[1]==2)&&(f[2]>2)),eulerphi(f[1]^f[2])/2, eulerphi(f[1]^f[2])) }
{cl(f)= my(k=factor(f), l=1); for(x=1,omega(f),l=lcm(l,cmf([k[x,1], k[x,2]]))); l }
{A062377(n)=eulerphi(n)/cl(n)}
for(x=1,30001, if(A062377(x)==14,print1(x,",")))

PARI

isok(k) = eulerphi(k)/lcm(znstar(k)[2]) == 14; \\ Michel Marcus, May 25 2022

Extensions

Terms joined (twice) by Georg Fischer, Jul 08 2022