|
| |
|
|
A067842
|
|
Expansion of 1/Product_{k=1..infinity} (1-x^A007097(k)).
|
|
0
| |
|
|
1, 0, 1, 1, 1, 2, 2, 2, 3, 3, 4, 5, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 17, 18, 20, 22, 24, 26, 28, 30, 33, 36, 38, 42, 44, 48, 52, 55, 59, 63, 67, 72, 77, 81, 87, 92, 98, 104, 110, 116, 123, 130, 137, 145, 152, 161, 169, 178, 187, 196, 206, 216, 227, 237, 249, 260, 273, 285
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,6
|
|
|
FORMULA
| G.f.: 1/((1-x^2)(1-x^3)(1-x^5)(1-x^11)...).
|
|
|
MATHEMATICA
| CoefficientList[ Series[1/Product[1 - x^Nest[Prime, 1, i], {i, 1, 6}], {x, 0, 75}], x]
|
|
|
CROSSREFS
| Cf. A007097.
Sequence in context: A103563 A008625 A029148 * A164066 A053251 A090184
Adjacent sequences: A067839 A067840 A067841 * A067843 A067844 A067845
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 11 2002
|
| |
|
|
