login
A301512
Number of distinct hook length sets of partitions of n.
2
1, 1, 1, 2, 3, 4, 6, 7, 11, 14, 19, 23, 35, 39, 54, 66, 91, 104, 142, 165, 214, 257, 328, 378, 496, 571, 720, 848, 1061, 1215, 1532, 1763, 2175, 2537, 3105, 3574, 4364, 5017, 6062, 7020, 8416, 9659, 11621, 13343, 15859, 18218, 21620, 24769, 29212, 33436, 39354
OFFSET
0,4
MAPLE
h:= l-> (n-> {{seq(seq(1+l[i]-j+add(`if`(l[k]<j, 0, 1),
k=i+1..n), j=1..l[i]), i=1..n)}})(nops(l)):
g:= (n, i, l)-> `if`(n=0 or i=1, h([l[], 1$n]),
{g(n, i-1, l)[], g(n-i, min(n-i, i), [l[], i])[]}):
a:= n-> nops(g(n$2, [])):
seq(a(n), n=0..30);
CROSSREFS
Sequence in context: A308189 A074885 A215231 * A091336 A002235 A217132
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Mar 22 2018
STATUS
approved