A119792 Record values in A119791.

1, 2, 4, 5, 6, 8, 12, 15, 18, 20, 24, 30, 32, 40, 48, 60, 63, 64, 80, 84, 90, 96, 120, 160, 180, 240, 252, 256, 288, 320, 336, 384, 432, 512

Offset

1,2

Comments

a(n)=A119791(A119793(n)) and A119791(m)<a(n) for m < A119793(n).

Links

Table of n, a(n) for n=1..34.

Mathematica

nxt[{n_, a_}]:={n+1, DivisorSigma[0, a(n+1)]}; DeleteDuplicates[NestList[nxt, {1, 1}, 250000][[;; , 2]], GreaterEqual] (* Harvey P. Dale, Nov 16 2024 *)

Crossrefs

Sequence in context: A240064 A007192 A081354 * A085834 A255577 A245319

Adjacent sequences: A119789 A119790 A119791 * A119793 A119794 A119795

Keyword

nonn,changed

Author

Reinhard Zumkeller, May 24 2006

Status

approved