A187205 Numbers such that the last of the absolute differences of divisors is 0.

10, 40, 50, 56, 104, 130, 136, 160, 170, 171, 224, 230, 232, 250, 290, 310, 312, 370, 392, 410, 430, 459, 470, 520, 530, 560, 590, 610, 624, 640, 648, 670, 710, 730, 790, 830, 890, 896, 970, 1000, 1010, 1030, 1070, 1088, 1090, 1130, 1160, 1216, 1218, 1221

Offset: 1

Author

Omar E. Pol, Aug 01 2011

Keywords

• nonn

Comments

Numbers n such that A187203(n) = 0.

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A027750, A187202, A187203, A187204.

Programs

Haskell

import Data.List (elemIndices)
a187205 n = a187205_list !! (n-1)
a187205_list = map (+ 1) $ elemIndices 0 $ map a187203 [1..]