OFFSET
1,1
COMMENTS
Except when Phi(n) = Lambda(n), the value Phi(n)/Lambda(n) must be even.
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000
MATHEMATICA
nn = 75; a = Table[0, {nn}]; found = 0; k = 0; While[found < nn, k++; b = EulerPhi[k]/CarmichaelLambda[k]; If[IntegerQ[b/2] && b/2 <= nn && a[[b/2]] == 0, a[[b/2]] = k; found++]]; a
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jan 13 2002
STATUS
approved