OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..88
MATHEMATICA
a = 0; c = {}; Do[ b = EulerPhi[n]/CarmichaelLambda[n]; If[ b > a, a = b; c = Append[c, n]], {n, 1, 10^7}]; c
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jan 13 2002
EXTENSIONS
Title improved by Amiram Eldar, Jul 20, 2019
STATUS
approved