OFFSET
1,1
COMMENTS
a(35) > 10^12. - Donovan Johnson, Feb 28 2012
EXAMPLE
phi(14)+6 = 12, which divides sigma(14)=24, so 14 is in the sequence.
MATHEMATICA
Select[Range[100000],
Divisible[DivisorSigma[1, #], EulerPhi[#] + 6] &] (* David Nacin, Feb 28 2012 *)
PROG
(PARI) isok(n) = (sigma(n) % (eulerphi(n) + 6)) == 0; \\ Michel Marcus, Jul 15 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Jud McCranie, Dec 25 1999
a(32)-a(34) from Donovan Johnson, Feb 28 2012
STATUS
approved