A134790 - OEIS

%I #17 Mar 14 2015 01:07:14

%S 0,1,1,8,17,93,1245,17732,10081265,63217341,1195118711985005,

%T 8140003186959622868813528,139669360584622467747806013,

%U 1324290912910022899017738237233285189213652972190967113265372469016533360

%N Floor(prime Fibonacci(Prime(k))/Prime(k)).

%H Vincenzo Librandi, <a href="/A134790/b134790.txt">Table of n, a(n) for n = 1..22</a>

%e 17732 is in the sequence because floor(514229/29) = 17732, where 29 is the 10th prime number and 514229 = Fibonacci(29) is also a prime. - _Bruno Berselli_, Jul 10 2012

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

%Y Cf. A050937, A090819, A134787, A134788, A134789.

%Y Cf. A000040, A000045, A075737.

%K nonn

%O 1,4

%A _Artur Jasinski_, Nov 12 2007