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 A167023 #15 Mar 21 2016 14:32:00 %S A167023 5,34,144,46368 %N A167023 Fibonacci numbers where both neighbors are semiprimes. %C A167023 Next term (if it exists) is larger than 10^10000. I conjecture that this sequence is finite: if neighbors of Fibonacci numbers behave randomly, the expected number of remaining terms is about 0.0103 (or 0.00779 if their behavior mod 6 is taken into account). - _Charles R Greathouse IV_, Nov 09 2009 %F A167023 A124936 INTERSECT A000045. - _R. J. Mathar_, Nov 03 2009 %e A167023 5 is in the sequence because 4=2*2 and 6=2*3. 46368 is in the sequence because 46367 = 199 * 233 and 46369 = 89 * 521. %t A167023 u[n_]:=Plus@@Last/@FactorInteger[n]==2; lst={};Do[f=Fibonacci[n];If[u[f-1]&&u[f+1], Print[f];AppendTo[lst,f]],{n,3*5!}];lst %t A167023 Select[Fibonacci[Range[200]],Union[PrimeOmega[#+{1,-1}]]=={2}&] (* _Harvey P. Dale_, Mar 16 2015 *) %o A167023 (PARI) for(n=5,99, f=fibonacci(n); if(bigomega(f-1)==2 && bigomega(f+1)==2, print1(f", "))) \\ _Charles R Greathouse IV_, Mar 21 2016 %Y A167023 Cf. A000045, A001358. %K A167023 nonn %O A167023 1,1 %A A167023 _Vladimir Joseph Stephan Orlovsky_, Oct 27 2009 %E A167023 Edited by _R. J. Mathar_, Nov 05 2009 and _Charles R Greathouse IV_, Nov 09 2009