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 A163853 #8 Jul 12 2025 12:42:20 %S A163853 17,229,373,983,4177,6761,17707,4052739537877,190392490709131, %T A163853 19740274219868223163,354224848179261915071, %U A163853 11825896447871834976429068423,3807901929474025356630904134047 %N A163853 Primes 4 less than some Fibonacci number. %C A163853 Primes of the form A000045(i)-4, generated by i= 8, 13, 14, 16, 19, 20, 22,... %C A163853 representing prime(j) at j= 4, 7, 50, 74, 166, 574, 870, 2033,... %H A163853 Harvey P. Dale, <a href="/A163853/b163853.txt">Table of n, a(n) for n = 1..23</a> %t A163853 Clear[lst,a,f,n,p]; a=4;lst={};Do[f=Fibonacci[n];If[PrimeQ[p=f-a]&&p> 1,AppendTo[lst,p]],{n,3*6!}];lst %t A163853 Select[Fibonacci[Range[4,300]]-4,PrimeQ] (* _Harvey P. Dale_, Jul 12 2025 *) %Y A163853 Cf. A000045, A005478, A163851, A163852, A163854, A163855 %K A163853 nonn %O A163853 1,1 %A A163853 _Vladimir Joseph Stephan Orlovsky_, Aug 05 2009 %E A163853 Some indices to Fibonacci and prime sequences added by _R. J. Mathar_, Sep 17 2009