A179662 Number of partitions of n into square parts.

1, 1, 1, 5, 6, 9, 11, 15, 30, 41, 54, 73, 94, 123, 157, 231, 296, 383, 486, 620, 780, 983, 1225, 1530, 1958, 2435, 3008, 3714, 4558, 5592, 6823, 8319, 10098, 12243, 14786, 17977, 21636, 26013, 31181, 37331, 44571, 53155, 63231, 75130, 89067, 105461

Offset

1,4

Links

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

Mathematica

f[n_] := Length@ IntegerPartitions[n, All, Floor[ Sqrt@n]^2]; Array[f, 46]

Crossrefs

Cf. A001156, A000041. [From R. J. Mathar, Aug 12 2010]

Sequence in context: A285505 A334815 A220968 * A137859 A082576 A177731

Adjacent sequences: A179659 A179660 A179661 * A179663 A179664 A179665

Keyword

nonn

Author

Robert G. Wilson v, Jul 23 2010

Status

approved