login
A086503
(Fibonacci(p^2) - 1)/p where p runs through the primes (except p = 5).
1
1, 11, 1111248864, 788182490773449878004720, 7169400598567939603802236558975536, 65689220552515842035267165282031641214284919342206590966464, 65508782365041737148850316083639110316959805405554589114037702352109769040
OFFSET
1,2
LINKS
MATHEMATICA
Table[(Fibonacci[p^2] - 1)/p, {p, Delete[Prime[Range[8]], 3]}] (* Amiram Eldar, Apr 21 2025 *)
CROSSREFS
Cf. A000045.
Sequence in context: A295173 A022545 A346996 * A275573 A247846 A257127
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Sep 09 2003
STATUS
approved