A135970 Fibonacci(Mersenne primes): a(n) = Fibonacci(A000668(n)).

2, 13, 1346269, 155576970220531065681649693

Offset: 1

Author

Artur Jasinski, Dec 09 2007

Keywords

• nonn

Comments

This sequence is a subsequence of A101342. The next term, a(5), has 1712 digits.

Crossrefs

Cf. A000045, A000668, A001605, A050937, A075737, A090819, A134787, A134851, A134852, A135953, A135954, A135955, A135956, A135957, A135958, A135959, A135968, A135969, A101342.

Programs

Mathematica

k = {}; Do[If[PrimeQ[2^n - 1], AppendTo[k, Fibonacci[2^n - 1]]], {n, 1, 15}]; k
Fibonacci/@Select[Table[2^Prime[n]-1,{n,5}],PrimeQ] (* Harvey P. Dale, May 06 2018 *)