login
k appears partition(k) times.
32

%I #16 Feb 18 2024 01:34:00

%S 0,1,2,2,3,3,3,4,4,4,4,4,5,5,5,5,5,5,5,6,6,6,6,6,6,6,6,6,6,6,7,7,7,7,

%T 7,7,7,7,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,9,

%U 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,10

%N k appears partition(k) times.

%D M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, 1972, p. 831, column labeled "n".

%H Robert Price, <a href="/A036042/b036042.txt">Table of n, a(n) for n = 0..9295</a> (0 <= k <=25).

%H M. Abramowitz and I. A. Stegun, eds., <a href="http://www.convertit.com/Go/ConvertIt/Reference/AMS55.ASP">Handbook of Mathematical Functions</a>, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].

%F Sum_{n>=1} (-1)^(n+1)/a(n) = Sum_{n>=2} (-1)^n/A052002(n) = 0.78686... . - _Amiram Eldar_, Feb 18 2024

%t Table[ConstantArray[n, PartitionsP[n]], {n, 0, 9}] // Flatten (* _Robert Price_, Jun 12 2020 *)

%Y Cf. A000041, A052002.

%K nonn

%O 0,3

%A _N. J. A. Sloane_.