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 A050786 #13 Aug 19 2021 06:18:14 %S A050786 11,11311,11411,13331,15551,16661,19991,33533,72227,75557,76667,77377, %T A050786 77477,77977,78887,79997,1003001,1008001,1022201,1055501,1114111, %U A050786 1117111,1120211,1123211,1126211,1129211,1134311,1145411,1150511 %N A050786 Palindromic primes containing at least one pair of consecutive equal digits. %t A050786 Select[Prime[Range[89500]],Reverse[x=IntegerDigits[#]]==x&&MemberQ[Differences[x],0]&] (* _Jayanta Basu_, Jun 01 2013 *) %Y A050786 Cf. A002385, A050785, A050784, A050758. %K A050786 nonn,base %O A050786 1,1 %A A050786 _Patrick De Geest_, Sep 15 1999