OFFSET
1,2
COMMENTS
a(33) > 10^12. - Donovan Johnson, Sep 03 2013
a(34) <= 9015394227840, a(35) <= 1255683068640. - Giovanni Resta, May 08 2017
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..36 (calculated using data from Jud McCranie)
FORMULA
For n > 3, a(n) = A055234(n). - David Wasserman, Aug 18 2005
MATHEMATICA
ds[x_, de_] := DivisorSigma[1, x]-de*EulerPhi[x] a[n_] := Block[{m=1, s=ds[m, n]}, While[(s !=0||PrimeQ[m])&&!Greater[m, 100000], m++ ]; m]; Table[a[n], {n, 22}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Nov 03 2003
EXTENSIONS
More terms from David Wasserman, Aug 18 2005
a(32) from Donovan Johnson, Sep 03 2013
a(33) from Giovanni Resta, May 08 2017
STATUS
approved