login
A134789
Rounded ratio prime Fibonacci[Prime[k]]/Prime[k].
4
1, 1, 2, 8, 18, 94, 1246, 17732, 10081266, 63217342, 1195118711985006, 8140003186959622868813528, 139669360584622467747806014, 1324290912910022899017738237233285189213652972190967113265372469016533360
OFFSET
1,3
MATHEMATICA
k = {}; Do[If[PrimeQ[Fibonacci[Prime[n]]], AppendTo[k, Round[Fibonacci[Prime[n]]/Prime[n]]]], {n, 1, 100}]; k
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Nov 12 2007
STATUS
approved