A163155 Primes of the form A001654(k) - 2.

13, 271, 28284463, 12610431355437389859745050577282818321295774208230808159, 421002806942919116087256468214897259565893934905313644799059599

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 21 2009

Keywords

• nonn

Comments

Generated at the indices k= 4, 7, 19, 133, 151, 205, 385, 475, 991, 1153 etc. of the golden rectangle numbers.

Crossrefs

Cf. A001654, A163154 - A163157.

Programs

Mathematica

q=0;lst={};Do[f=Fibonacci[n];If[PrimeQ[f*q-2],AppendTo[lst,f*q-2]];q=f,{n,6!}];lst
Select[#-2&/@(Times@@@Partition[Fibonacci[Range[3,300]],2,1]),PrimeQ] (* Harvey P. Dale, Aug 18 2011 *)