This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A163155 #8 Nov 21 2013 12:49:40 %S A163155 13,271,28284463, %T A163155 12610431355437389859745050577282818321295774208230808159, %U A163155 421002806942919116087256468214897259565893934905313644799059599 %N A163155 Primes of the form A001654(k) - 2. %C A163155 Generated at the indices k= 4, 7, 19, 133, 151, 205, 385, 475, 991, 1153 etc. of the golden rectangle numbers. %t A163155 q=0;lst={};Do[f=Fibonacci[n];If[PrimeQ[f*q-2],AppendTo[lst,f*q-2]];q=f,{n,6!}];lst %t A163155 Select[#-2&/@(Times@@@Partition[Fibonacci[Range[3,300]],2,1]),PrimeQ] (* _Harvey P. Dale_, Aug 18 2011 *) %Y A163155 Cf. A001654, A163154 - A163157. %K A163155 nonn %O A163155 1,1 %A A163155 _Vladimir Joseph Stephan Orlovsky_, Jul 21 2009