|
%I #7 Nov 03 2014 02:09:51
%S 7,40,41,96,664,6095,8419,11471,13690,38835,49832,97152
%N Indices of prime Fibonacci 6-step numbers, A001592.
%C This sequence is similar to A105758 but uses the indexing scheme defined by A001592, whose indices start with 0.
%C a(13) > 3*10^5.
%H Tony D. Noe and Jonathan Vos Post, <a href="http://www.cs.uwaterloo.ca/journals/JIS/VOL8/Noe/noe5.html">Primes in Fibonacci n-step and Lucas n-step Sequences,</a> J. of Integer Sequences, Vol. 8 (2005), Article 05.4.4
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Fibonaccin-StepNumber.html">Fibonacci n-Step Number</a>
%F a(n) = A105758 (n) + 4.
%t a = {0, 0, 0, 0, 0, 1}; For[n = 6, n ≤ 1000, n++, sum = Plus @@ a;
%t If[PrimeQ[sum], Print[n]]; a = RotateLeft[a]; a[[6]] = sum]
%Y Cf. A001592, A105758.
%K nonn,more
%O 1,1
%A _Robert Price_, Nov 02 2014
|
