|
|
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;
text;
internal format)
|
|
|
OFFSET
|
1,6
|
|
COMMENTS
|
a(3i-1)=a(3i+1)=0.
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Marcel Dubois de Cadouin (dubois.ml(AT)club-internet.fr), Oct 27 2004
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|