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