A369339 Number of partitions of n into triangular numbers not greater than sqrt(n).

1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 4, 4, 5, 5, 5, 6, 6, 6, 7, 7, 7, 8, 8, 8, 9, 9, 9, 10, 10, 10, 11, 11, 11, 12, 12, 12, 49, 49, 49, 56, 56, 56, 64, 64, 64, 72, 72, 72, 81, 81, 81, 90, 90, 90, 100, 100, 100, 110, 110, 110, 121, 121, 121, 132, 132, 132, 144, 144, 144, 156, 156

Offset

0,10

Links

Table of n, a(n) for n=0..70.

Mathematica

Table[SeriesCoefficient[Product[1/(1 - x^(k (k + 1)/2)), {k, 1, Floor[(Sqrt[1 + 8 Sqrt[n]] - 1)/2]}], {x, 0, n}], {n, 0, 70}]

Crossrefs

Cf. A007294, A097356.

Sequence in context: A164838 A059112 A111731 * A368868 A134992 A073260

Adjacent sequences: A369336 A369337 A369338 * A369340 A369341 A369342

Keyword

nonn

Author

Ilya Gutkovskiy, Jan 20 2024

Status

approved