A180040 Record values in A033273.

1, 2, 3, 4, 6, 7, 8, 9, 10, 13, 15, 17, 21, 27, 28, 29, 32, 33, 36, 37, 44, 45, 56, 60, 68, 76, 80, 86, 91, 92, 96, 104, 115, 116, 123, 139, 140, 155, 163, 175, 187, 195, 211, 219, 234, 235, 250, 251, 282, 283, 314, 330, 331, 354, 378, 394, 426, 442, 474, 498, 506, 570, 594

Offset: 1

Author

Ray Chandler, Aug 07 2010

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 1..571 (terms 1..146 from Ray Chandler)

Crossrefs

Cf. A033273, A059992.

Programs

PARI

lista(nn) = {my(m=0, nb); for (n=1, nn, nb = sumdiv(n, d, !isprime(d)); if (nb > m, m = nb; print1(nb, ", ")););} \\ Michel Marcus, Jul 16 2019

Formula

a(n) = A033273(A059992(n)).