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 A140841 #16 Oct 30 2019 15:58:44
%S A140841 13,223,433,643,853,1063,1483,1693,2113,2953,3163,3373,3583,3793,4003,
%T A140841 4423,5683,6733,7573,7993,8623,9043,9463,9883,10093,10303,10513,10723,
%U A140841 11353,12613,12823,13033,13873,14083,14293,14503,14713,14923,15973
%N A140841 Primes of the form 210n + 13.
%p A140841 A140841 := proc(n) local a; if n = 1 then 13; else a := nextprime(procname(n-1)) ; while not a mod 210 in {13} do a := nextprime(a) ; end do: return a; end if; end: seq(A140841(n),n=1..80) ; # _R. J. Mathar_, Oct 22 2009
%t A140841 Select[13+210Range[0,150],PrimeQ] (* _Ray Chandler_, Apr 29 2010 *)
%o A140841 (PARI) forprime(p=1,1e4,if(p%210==13,print1(p", "))) \\ _Charles R Greathouse IV_, Dec 21 2011
%Y A140841 Cf. A073102, A075745.
%K A140841 nonn
%O A140841 1,1
%A A140841 _Juri-Stepan Gerasimov_, Jul 04 2008
%E A140841 More terms from _R. J. Mathar_, Oct 22 2009