OFFSET
1,1
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
Amiram Eldar, Plot of a(n)/(n*log(n)^2) for n = 2^(4..21).
FORMULA
It seems that a(n) is asymptotic to C*n*log(n)^2 with C=1.38.... - Benoit Cloitre, Aug 07 2002
MATHEMATICA
Select[Range[1, 10^3], EulerPhi[DivisorSigma[1, # ]] > # &]
PROG
(PARI) { n=0; for (m=1, 10^10, if (eulerphi(sigma(m)) > m, write("b066694.txt", n++, " ", m); if (n==1000, return)) ) } \\ Harry J. Smith, Mar 18 2010
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Joseph L. Pe, Jan 09 2002
EXTENSIONS
More terms from Benoit Cloitre, Jul 31 2002
STATUS
approved