|
| |
|
|
A024791
|
|
Number of 7's in all partitions of n.
|
|
10
| |
|
|
0, 0, 0, 0, 0, 0, 1, 1, 2, 3, 5, 7, 11, 16, 23, 32, 45, 61, 84, 112, 151, 199, 263, 342, 446, 574, 739, 943, 1201, 1518, 1917, 2404, 3010, 3749, 4661, 5766, 7122, 8759, 10753, 13153, 16059, 19544, 23743, 28759, 34774, 41938, 50491, 60642, 72718, 87004, 103934, 123908
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,9
|
|
|
MATHEMATICA
| << DiscreteMath`Combinatorica`; Table[ Count[ Flatten[ Partitions[n]], 7], {n, 1, 52} ]
|
|
|
CROSSREFS
| Cf. A066633, A024786, A024787, A024788, A024789, A024790, A024792, A024793, A024794.
Sequence in context: A177485 A165801 A022480 * A178240 A118084 A117590
Adjacent sequences: A024788 A024789 A024790 * A024792 A024793 A024794
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
| |
|
|