OFFSET
1,2
PROG
(PARI) for(n=1, 2000, if(0<sum(i=1, n, if(lcm(sigma(i), eulerphi(i))-n, 0, 1)), print1(n, ", ")))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, May 10 2002
STATUS
approved