|
| |
|
|
A026813
|
|
Number of partitions of n in which the greatest part is 7.
|
|
9
| |
|
|
0, 0, 0, 0, 0, 0, 1, 1, 2, 3, 5, 7, 11, 15, 21, 28, 38, 49, 65, 82, 105, 131, 164, 201, 248, 300, 364, 436, 522, 618, 733, 860, 1009, 1175, 1367, 1579, 1824, 2093, 2400, 2738, 3120, 3539, 4011, 4526, 5102, 5731, 6430, 7190, 8033, 8946, 9953, 11044, 12241
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,9
|
|
|
MATHEMATICA
| Table[ Length[ Select[ Partitions[n], First[ # ] == 7 & ]], {n, 1, 60} ]
|
|
|
CROSSREFS
| Cf. A026810, A026811, A026812, A026814, A026815, A026816.
Sequence in context: A106532 A090693 A049756 * A008636 A008630 A035969
Adjacent sequences: A026810 A026811 A026812 * A026814 A026815 A026816
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 11 2002
|
| |
|
|
