OFFSET
1,1
COMMENTS
The sequence consists mainly of terms of A055574 = { n | sigma(n+1) = sigma(n-1) }. - M. F. Hasler, Aug 06 2015
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..6000 (term 1..280 from Harvey P. Dale)
EXAMPLE
Sigma(8507) = 8736 divides sigma(8505) = 17472 = 8736*2, so 8506 is in the sequence.
MATHEMATICA
Flatten[Position[Partition[DivisorSigma[1, Range[40000]], 3, 1], _?(Divisible[ #[[1]], #[[3]]]&), {1}, Heads->False]]+1 (* Harvey P. Dale, Jul 15 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, Jul 05 2013
STATUS
approved
