OFFSET
1,1
COMMENTS
EXAMPLE
PROG
(Sage)
terms = []
for n in range(1, 10000): # Equivalent of A151999/b151999.txt
if euler_phi(n)**2 == euler_phi(euler_phi(n) * n): terms.append(n)
displayTerms = []
for n in range(0, 10000):
searchTerms = terms[n+1::]
found = False
for k in range(0, len(searchTerms)):
if terms[n] == euler_phi(searchTerms[k]):
found = True
break
if False == found and n < len(terms):
displayTerms.append(terms[n])
for n in range(0, 55):
print(displayTerms[n], end=', ')
CROSSREFS
KEYWORD
nonn
AUTHOR
Torlach Rush, Sep 30 2024
STATUS
approved