OFFSET
0,6
LINKS
Eric Weisstein's World of Mathematics, Fibonacci Prime
FORMULA
G.f.: Product_{k>=1} 1/(1 - x^A005478(k)).
EXAMPLE
a(8) = 3 because we have [5, 3], [3, 3, 2] and [2, 2, 2, 2].
MATHEMATICA
CoefficientList[Series[Product[1/(1 - Boole[PrimeQ[Fibonacci[k]]] x^Fibonacci[k]), {k, 1, 30}], {x, 0, 70}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jun 05 2017
STATUS
approved