A086367 (1/p)*(F(p^2+1)-1) where p runs through the primes (except p = 5) and F(k) is the k-th Fibonacci number.

2, 18, 1798038432, 1275306059408992299902160, 11600333847446766979664251842465168, 106287391548458779396407861152154912538870151693018243514432, 105995436428257252153102314947975621532461641494448273298482314368591355120

Offset

1,1

Links

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

Mathematica

Table[(Fibonacci[p^2+1] - 1)/p, {p, Delete[Prime[Range[8]], 3]}] (* Amiram Eldar, Apr 21 2025 *)

Crossrefs

Cf. A000045.

Sequence in context: A293242 A387842 A321339 * A321340 A393669 A221229

Adjacent sequences: A086364 A086365 A086366 * A086368 A086369 A086370

Keyword

nonn

Author

Benoit Cloitre, Sep 05 2003

Status

approved