%I #7 Mar 23 2018 18:25:15
%S 1,1,1,2,2,3,4,5,6,7,10,10,15,15,21,23,29,31,41,42,53,59,73,79,94,107,
%T 125,140,160,180,208,235,260,299,331,379,420,474,532,596,670,735,835,
%U 917,1022,1136,1265,1388,1562,1710,1910,2098,2339,2543,2834,3110,3421,3765,4158,4546,5016
%N Number of distinct hook length sets of strict partitions of n.
%p h:= l-> (n-> {{seq(seq(1+l[i]-j+add(`if`(l[k]<j, 0, 1),
%p k=i+1..n), j=1..l[i]), i=1..n)}})(nops(l)):
%p g:= (n, i, l)-> `if`(i*(i+1)/2<n, {}, `if`(n=0, h(l),
%p {g(n, i-1, l)[], g(n-i, min(n-i, i-1), [l[], i])[]})):
%p a:= n-> nops(g(n$2, [])):
%p seq(a(n), n=0..40);
%Y Cf. A000009, A301512.
%K nonn
%O 0,4
%A _Alois P. Heinz_, Mar 22 2018
|