

A114324


Number of partitions of n with a product greater than n.


0



0, 0, 0, 0, 1, 3, 6, 10, 16, 26, 39, 56, 79, 111, 150, 200, 265, 349, 453, 586, 749, 957, 1209, 1522, 1903, 2379, 2950, 3654, 4500, 5534, 6771, 8271, 10063, 12228, 14799, 17884, 21543, 25919, 31087, 37233, 44477, 53063, 63149, 75059, 89014, 105436
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,6


LINKS

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


EXAMPLE

a(6)=3 since there are 3 partitions of 6 with product greater than 6:
{3,3},{2,2,2},{4,2}.


MATHEMATICA

<< DiscreteMath`Combinatorica`; lst=Table[Length@Select[Partitions[n], (Times @@ # > n) &], {n, 50}]


CROSSREFS

Cf. A096276.
Sequence in context: A025004 A145131 A152009 * A054886 A130578 A107068
Adjacent sequences: A114321 A114322 A114323 * A114325 A114326 A114327


KEYWORD

nonn


AUTHOR

Giovanni Resta, Feb 06 2006


STATUS

approved



