%I A059709
%S A059709 4,5,6,7,8,14,15
%N A059709 a(n)_th Fibonorial number (product of first a(n) nonzero Fibonacci numbers) 
               - 1 is prime.
%C A059709 a(n)_th almost-Fibonorial number is prime.
%H A059709 C. K. Caldwell, <a href="http://primes.utm.edu/glossary/page.php?sort=FibonacciNumber">
               Fibonacci Numbers</a>
%H A059709 %H A059709 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               Fibonorial.html">Fibonorial</a> [From Eric W. Weisstein (eric(AT)weisstein.com), 
               Dec 01 2009]
%t A059709 a = 1; Do[ a = a*Fibonacci[n]; If[ PrimeQ[a - 1], Print[n] ], {n, 1, 
               247} ]
%Y A059709 Cf. A053408.
%K A059709 nonn,new
%O A059709 1,1
%A A059709 Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 07 2001
%E A059709 Definition corrected by Daniel Forgues (squid(AT)zensearch.com), Nov 
               29 2009