A134789 a(n) = round(Fibonacci(prime(k))/prime(k)), where k = A119984(n).

1, 1, 2, 8, 18, 94, 1246, 17732, 10081266, 63217342, 1195118711985006, 8140003186959622868813528, 139669360584622467747806014, 1324290912910022899017738237233285189213652972190967113265372469016533360

Offset: 1

Author

Artur Jasinski, Nov 12 2007

Keywords

• nonn

Links

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

Crossrefs

Cf. A000045, A050937, A090819, A119984, A134787, A134788.

Programs

Mathematica

k = {}; Do[If[PrimeQ[Fibonacci[Prime[n]]], AppendTo[k, Round[Fibonacci[Prime[n]]/Prime[n]]]], {n, 1, 100}]; k