|
| |
|
|
A015718
|
|
Triangular array T given by rows: T(n,k) = number of partitions of n into distinct parts, none of which is k (1<=k<=n).
|
|
0
| |
|
|
0, 1, 0, 1, 1, 1, 1, 2, 1, 1, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 3, 4, 4, 4, 3, 4, 4, 5, 4, 5, 5, 5, 5, 5, 5, 6, 6, 6, 7, 7, 7, 5, 6, 6, 7, 8, 8, 8, 9, 9, 9, 7, 7, 8, 9, 9, 9, 10, 10, 11, 11, 11, 8, 9, 10, 10, 11, 12, 12, 13, 13, 14, 14, 14, 10, 11, 12
(list; table; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,8
|
|
|
EXAMPLE
| T(7,4)=3 because among the 5 partitions of 7 into distinct parts, only [7],[6,1] and [5,2] do not contain the part 4.
Triangle starts:
0;
1,0;
1,1,1;
1,2,1,1;
2,2,2,2,2;
2,2,3,3,3,3;
3,3,4,3,4,4,4;
|
|
|
MAPLE
| g:=product(1+x^i, i=1..30)*sum(t^j/(1+x^j), j=1..50): gser:=simplify(series(g, x=0, 18)): for n from 1 to 16 do P[n]:=sort(coeff(gser, x^n)) od: for n from 1 to 14 do seq(coeff(P[n], t^k), k=1..n) od; # yields sequence in triangular form - Emeric Deutsch (deutsch(AT)duke.poly.edu), Apr 15 2006
|
|
|
CROSSREFS
| Sequence in context: A183015 A183018 A067390 * A008350 A019556 A165640
Adjacent sequences: A015715 A015716 A015717 * A015719 A015720 A015721
|
|
|
KEYWORD
| nonn,tabl
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
| |
|
|
