A098642 Number of partitions of Fibonacci(n) into odd Fibonacci numbers.

1, 1, 1, 1, 2, 3, 5, 11, 28, 87, 331, 1565, 9440, 72908, 712687, 8940809, 146775560, 3135694178, 86745468962, 3153522201617, 151857397825012, 9589042822673342, 797159462260375958, 88429042471401581924, 13020775433175768654191, 2532864078831923248348591

Offset

0,5

Links

Table of n, a(n) for n=0..25.

Mathematica

cl = CoefficientList[ Series[1/Product[(1 - x^Fibonacci[3i + 1])(1 - x^Fibonacci[3i - 1]), {i, 8}], {x, 0, 46370}], x]; cl[[Table[Fibonacci[i] + 1, {i, 24}]]] (* Robert G. Wilson v *)

Crossrefs

Cf. A000045, A098641-A098644.

Sequence in context: A098179 A055228 A173758 * A079447 A171832 A084865

Adjacent sequences: A098639 A098640 A098641 * A098643 A098644 A098645

Keyword

nonn

Author

Marcel Dubois de Cadouin (dubois.ml(AT)club-internet.fr), Oct 27 2004

Extensions

Corrected and extended by Franklin T. Adams-Watters and Robert G. Wilson v, Mar 28 2006

a(0)=1 prepended and a(25) from Alois P. Heinz, Jun 02 2023

Status

approved