%I #25 May 10 2021 04:39:15
%S 2,3,5,13,17,29,37,89,101,109,197,233,257,401,577,677,701,1297,1597,
%T 1601,2549,2917,3137,4289,4357,5477,5741,7057,8101,8837,10301,12101,
%U 13457,14401,15377,15877,16901
%N Primes occurring in the Fibonacci sequences 2, 3, 5, ...; 5, 12, 29, ...; 10, 33, 109, ...; 17, 72, 305, ...; ..., where F(n) = m*F(n-1) + F(n-2) (n>2), with F(1) = 1, F(2) = positive integer m.
%C From a posting by _Daniel Joyce_ to the Sequence Fans Mailing List, Jul 19 2013
%C A002496 is a subsequence of this sequence. - _Hans Havermann_, Aug 01 2013
%H Hans Havermann, <a href="/A227829/b227829.txt">Table of n, a(n) for n = 1..6735</a>
%H Hans Havermann, <a href="http://chesswanks.com/seq/b227829.txt">Table of n, a(n) for n = 1..54295</a>, output of my Mathematica program (below)
%t t={};Do[AppendTo[t,Select[Take[Table[If[n==0,a1=1;a0=0,a2=a1;a1=a0;a0=i*a1+a2],{n,0,60}],-58],#<10^12&]],{i,999999}];Select[Union[Flatten[t]], PrimeQ[#] &] (* _Hans Havermann_, Aug 01 2013 *)
%Y Cf. A000045 (m=1), A000129 (m=2), A006190 (m=3), A001076 (m=4), A002496.
%K nonn
%O 1,1
%A _N. J. A. Sloane_, Aug 01 2013