A145912 Prime Leonardo numbers.

3, 5, 41, 67, 109, 1973, 5167, 2692537, 11405773, 126491971, 331160281, 535828591, 279167724889, 145446920496281, 28944668049352441, 5760134388741632239, 63880869269980199809, 167242286979696845953, 597222253637954133837103

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..50

Formula

a(n) = A001595(A228145(n)-1). - Amiram Eldar, Sep 04 2017

Mathematica

A228145 = Select[Range[200], PrimeQ[2 Fibonacci[#] - 1] &]; A001595[n_] := 2*Fibonacci[n + 1] - 1; a = A001595[A228145 - 1] (* Amiram Eldar, Sep 04 2017 *)

Crossrefs

Cf. A001595.

Sequence in context: A146318 A228968 A178545 * A096058 A120265 A158328

Adjacent sequences: A145909 A145910 A145911 * A145913 A145914 A145915

Keyword

nonn

Author

Howard Berman (howard_berman(AT)hotmail.com), Oct 24 2008

Extensions

Extended by Klaus Brockhaus, Oct 26 2008

Status

approved