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 A103385 #6 Mar 30 2012 18:40:27 %S A103385 2,3,5,7,17,31,71,127,157,227,257,293,349,419,503,1993,7907,26293, %T A103385 29311,34603,67477,3147311,9159547,973669469,6797534657,9627183689, %U A103385 297222052181,4530692779838851,41748646469705167,266359428042546661 %N A103385 Primes in A103375. %C A103385 Intersection of A103375 with A000040. %e A103385 17 is an element of this sequence because A103375(36) = 17. %t A103385 k = 7; Do[a[n] = 1, {n, k + 1}]; a[n_] := a[n] = a[n - k] + a[n - k - 1]; Union[Select[Array[a, 475], PrimeQ]] %Y A103385 Cf. A000040, A103375, A103382-A103391, A103395. %K A103385 nonn,easy %O A103385 1,1 %A A103385 _Jonathan Vos Post_, Feb 03 2005 %E A103385 Edited, corrected and extended by _Ray Chandler_ and _Robert G. Wilson v_, Feb 06 2005