|
|
A135970
|
|
Fibonacci(Mersenne primes): a(n) = Fibonacci(A000668(n)).
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
This sequence is a subsequence of A101342. The next term, a(5), has 1712 digits.
|
|
LINKS
|
|
|
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 *)
|
|
CROSSREFS
|
Cf. A000045, A000668, A001605, A050937, A075737, A090819, A134787, A134851, A134852, A135953, A135954, A135955, A135956, A135957, A135958, A135959, A135968, A135969, A101342.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|