A058858 Numbers k that divide the sum of the first k unique partition numbers (A000009).

1, 2, 8, 18, 42, 66, 69, 84, 1138, 1935, 3828, 9464, 130936, 150910, 261132, 1406536, 2877311, 5118856, 5497690, 5872385, 6009938, 6777062

Offset

1,2

Comments

Next term > 2000000. - Vaclav Kotesovec, May 05 2018

Next term > 16500000. - Sean A. Irvine, Aug 30 2022

Links

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

Mathematica

s = 0; Do[ s = s + PartitionsQ[ n ]; If[ Mod[ s, n ] == 0, Print[ n ] ], { n, 1, 8000} ]

Crossrefs

Sequence in context: A377676 A220909 A376192 * A236633 A212518 A264054

Adjacent sequences: A058855 A058856 A058857 * A058859 A058860 A058861

Keyword

nonn

Author

Robert G. Wilson v, Jan 05 2001

Extensions

a(13)-a(16) from Vaclav Kotesovec, May 05 2018

a(17)-a(22) from Sean A. Irvine, Aug 30 2022

Status

approved