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 A103384 #6 Mar 30 2012 18:40:26 %S A103384 2,3,5,7,17,31,71,127,157,227,293,349,419,521,1873,3877,4889,6607, %T A103384 12289,19843,31873,42703,80309,137957,884987,976091,9979037,15614983, %U A103384 29738231,45024979,812280583,6882259301,8479913153,88930242859,356874733421 %N A103384 Primes in A103374. %C A103384 Intersection of A103374 with A000040. %e A103384 1873 is an element of this sequence because A103374(74) = 1873. %t A103384 k = 6; Do[a[n] = 1, {n, k + 1}]; a[n_] := a[n] = a[n - k] + a[n - k - 1]; Union[Select[Array[a, 260], PrimeQ]] %Y A103384 Cf. A000040, A103374, A103382-A103391, A103394. %K A103384 nonn,easy %O A103384 1,1 %A A103384 _Jonathan Vos Post_, Feb 03 2005 %E A103384 Edited, corrected and extended by _Ray Chandler_ and _Robert G. Wilson v_, Feb 06 2005