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 A071329 #6 Nov 21 2013 12:47:48
%S A071329 3,5,7,11,13,19,23,23,31,37,41,47,53,53,61,67,73,79,83,89,89,101,103,
%T A071329 113,113,127,127,131,137,139,157,163,167,173,181,181,193,199,199,211,
%U A071329 211,223,233,233,241,241,257,271,271,277,283,283,293,293
%N A071329 Largest prime q such that q - prime(n) <= n.
%C A071329 a(n) = A007917(n + A000040(n));
%C A071329 a(n) = A071328(n) iff a(n) = A061068(k) for some k.
%e A071329 a(10) = A007917(10 + A000040(10)) = A007917(10 + 29)= A007917(39) = 37;
%e A071329 a(6) = A007917(6 + A000040(6)) = A007917(6 + 13)= A007917(19) = 19 = A071328(6) = A061068(4).
%t A071329 With[{prs=Prime[Range[100]]},Table[Last[Select[prs,(#-prs[[n]]<=n)&]],{n,60}]] (* _Harvey P. Dale_, May 11 2012 *)
%K A071329 nonn
%O A071329 1,1
%A A071329 _Reinhard Zumkeller_, May 19 2002