OFFSET
0,6
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
EXAMPLE
For n=9 the counts of partitions for k=1..9 is 0,0,1,4,5,3,2,1,1 so the maximum is 5 (at k=5).
MAPLE
b:= proc(n, i, t) option remember; `if`(n=0, 1,
`if`(i*t<n, 0, b(n, i-1, t)+b(n-i, min(n-i, i), t-1)))
end:
a:= n-> max(seq(b(n-i, min(n-i, i-1), i), i=0..n)):
seq(a(n), n=0..55); # Alois P. Heinz, May 12 2022
MATHEMATICA
Max @@@ Table[T[n, k, k]-T[n, k-1, k], {n, 1, 128}, {k, n}] (* with T[n, a, b] as defined in A047993 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Wouter Meeussen, Feb 22 2009
EXTENSIONS
a(0)=1 prepended by Alois P. Heinz, May 12 2022
STATUS
approved