|
| |
|
|
A098643
|
|
Number of partitions of Fibonacci(n) into even Fibonacci numbers.
|
|
2
| |
|
|
0, 0, 1, 0, 0, 2, 0, 0, 6, 0, 0, 52, 0, 0, 1471, 0, 0, 135029, 0, 0, 41906834, 0, 0, 45729175098, 0, 0
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,6
|
|
|
COMMENTS
| a(3i-1)=a(3i+1)=0.
|
|
|
MATHEMATICA
| cl = CoefficientList[ Series[1/Product[(1 - x^Fibonacci[3i]), {i, 8}], {x, 0, 46368}], x]; cl[[Table[Fibonacci[i] + 1, {i, 21}]]] (* Robert G. Wilson v *)
|
|
|
CROSSREFS
| Cf. A098641-A098644.
Sequence in context: A094785 A035536 A205974 * A193474 A028625 A193009
Adjacent sequences: A098640 A098641 A098642 * A098644 A098645 A098646
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Marcel Dubois de Cadouin (dubois.ml(AT)club-internet.fr), Oct 27 2004
|
|
|
EXTENSIONS
| More terms from Frank Adams-Watters (FrankTAW(AT)Netscape.net) and G. Wilson v (rgwv(AT)rgwv.com), Mar 28 2006
|
| |
|
|
