OFFSET
1,1
PROG
(PARI) finalc(x, v) = {while (!vecsearch(v, x), x = numerator(sigma(x)/x)); x; }
lista(nn, targ=512) = {v = [8, 127, 512, 29127]; for (i=2, nn, if (finalc(i, v) == targ, print1(i, ", ")); ); }
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Nov 02 2014
STATUS
approved