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 A028981 #16 Aug 25 2016 15:01:36
%S A028981 2,3,5,7,43,211,241,251,271,281,433,443,463,827,857,877,887,2111,2221,
%T A028981 2441,2551,4003,4663,4993,8117,8447,8887,20101,20201,21011,21211,
%U A028981 21611,21911,22621,22721,22921,23131,23431,23531,23831,24841
%N A028981 Primes p such that p+1 is palindromic.
%H A028981 Harvey P. Dale, <a href="/A028981/b028981.txt">Table of n, a(n) for n = 1..750</a>
%H A028981 Patrick De Geest, <a href="http://www.worldofnumbers.com/palpri.htm">World!Of Palindromic Primes</a>
%t A028981 palQ[n_] := Module[{idn = IntegerDigits[n + 1], len = Floor[IntegerLength[n + 1]/2]}, Take[idn, len] == Reverse[Take[idn, -len]]]; Select[Prime[Range[2800]], palQ] (* _Harvey P. Dale_, Nov 04 2011 *)
%t A028981 Select[Prime[Range[2800]], Reverse[x = IntegerDigits[# + 1]] == x &] (* _Jayanta Basu_, Jun 05 2013 *)
%Y A028981 Cf. A027713.
%K A028981 nonn,base
%O A028981 1,1
%A A028981 _Patrick De Geest_