| 0, 0, 0, 0, 0, 0, 0, 1, 1, 2, 3, 5, 7, 11, 15, 22, 29, 40, 52, 70, 89, 116, 146, 186, 230, 288, 352, 434, 525, 638, 764, 919, 1090, 1297, 1527, 1801, 2104, 2462, 2857, 3319, 3828, 4417, 5066, 5812, 6630, 7564, 8588, 9749, 11018, 12450, 14012, 15765, 17674
(list; graph; listen)
|
|
|
OFFSET
|
1,10
|
|
|
MATHEMATICA
|
Table[ Length[ Select[ Partitions[n], First[ # ] == 8 & ]], {n, 1, 60} ]
|
|
CROSSREFS
|
Cf. A026810, A026811, A026812, A026813, A026815, A026816.
Sequence in context: A036007 A027342 A085894 this_sequence A008637 A008631 A035978
Adjacent sequences: A026811 A026812 A026813 this_sequence A026815 A026816 A026817
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Clark Kimberling (ck6(AT)evansville.edu)
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 11 2002
|
|
