OFFSET
1,1
LINKS
Ivan Neretin, Table of n, a(n) for n = 1..396 (full sequence)
MATHEMATICA
Select[Range[170], DivisorSigma[0, #]^2 > EulerPhi[#] &] (* Ivan Neretin, Oct 16 2016 *)
CROSSREFS
KEYWORD
easy,nonn,fini,full
AUTHOR
Benoit Cloitre, Mar 26 2002
STATUS
approved