Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Aug 30 2022 18:57:07
%S 1,3,188,378,836,10179,15685,36769,53088,1112873,3717191,12019123
%N Numbers k that divide the sum of the partition numbers to k.
%C Next term > 2000000. - _Vaclav Kotesovec_, May 05 2018
%C Next term > 12500000. - _Sean A. Irvine_, Aug 30 2022
%t s = 0; Do[ s = s + PartitionsP[ n ]; If[ IntegerQ[ s/n ], Print[ n ] ], {n, 1, 10^5} ]
%K nonn,more
%O 1,2
%A _Robert G. Wilson v_, Jan 05 2001
%E a(10) from _Vaclav Kotesovec_, May 05 2018
%E a(11)-a(12) from _Sean A. Irvine_, Aug 30 2022