OFFSET
1,1
COMMENTS
a(17) > 10^12. - Donovan Johnson, Feb 28 2012
MATHEMATICA
Cases[Range[100000],
x_ /; Divisible[DivisorSigma[1, x], EulerPhi[x] + 7] == True] (* David Nacin, Feb 28 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected and a(9)-a(16) from Donovan Johnson, Feb 28 2012
STATUS
approved