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 A182569 #20 Feb 20 2018 05:07:25 %S A182569 7,11,23,29,37,47,97,149,157,199,241,379,521,613,631,1021,1741,2207, %T A182569 3571,9349,10949,11933,17713,46381,46457,46601,50549,75169,196439, %U A182569 203183,214129,560597,832129,2178343,3010349,3531343,14930441,15444581,16276621,24157961 %N A182569 Primes that have two terms in their Zeckendorf representation. %C A182569 Primes of the form Fibonacci(x)+Fibonacci(y), x-y>1. %F A182569 Intersection of A000040 and A179242. - _Michel Marcus_, May 28 2013 %e A182569 7 = 5+2. 11=8+3. 23=21+2. 29 =21+8. %t A182569 nn = 40; f = Fibonacci[Range[nn]]; ps = {}; Do[ps = Union[ps, Select[f[[k]] + Delete[f, {{k-1}, {k}, {k+1}}], PrimeQ]], {k, 4, nn-1}]; ps (* _T. D. Noe_, May 08 2012 *) %Y A182569 Cf. A014417, A179242-A179253, A182535, A182570-A182574. %K A182569 nonn %O A182569 1,1 %A A182569 _Alex Ratushnyak_, May 05 2012 %E A182569 More terms from _T. D. Noe_, May 08 2012