A073656 Rearrangement of Fibonacci numbers such that sum of two consecutive terms is a prime.

1, 1, 2, 3, 8, 5, 144, 13, 34, 55

Offset: 1

Author

Amarnath Murthy, Aug 10 2002

Keywords

• nonn

Comments

a(11) = F(67671), the 67671st Fibonacci number. This has over 14000 decimal digits and is too large to display here. - Ryan Propper, Jun 16 2006

Crossrefs

Cf. A073655, A073657.

Programs

Mathematica

l = {1, 1}; Do[k = 1; While[MemberQ[l, Fibonacci[k]] || !PrimeQ[Last[l] + Fibonacci[k]], k++ ]; AppendTo[l, Fibonacci[k]]; Print[l], {n, 9}] (* Ryan Propper, Jun 16 2006 *)