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 A046472 #26 Aug 11 2024 14:41:31
%S A046472 3,5,7,313,7284717174827,390714505091666190505417093
%N A046472 Primes that are palindromic in bases 2 and 10.
%H A046472 P. De Geest, <a href="https://www.worldofnumbers.com/palpri.htm">World!Of Palindromic Primes</a>
%e A046472 313_10 = 100111001_2. - _Jon E. Schoenfield_, Apr 10 2021
%t A046472 Select[Prime[Range[10!]], IntegerDigits[#]==Reverse[IntegerDigits[#]] && IntegerDigits[#,2]==Reverse[IntegerDigits[#,2]]&] (* _Vladimir Joseph Stephan Orlovsky_, Dec 30 2010 *)
%t A046472 p = Sort[Reap[Do[d=IntegerDigits[n]; p1=FromDigits[Join[Most[d], Reverse[d]]]; p2=FromDigits[Join[d, Reverse[d]]]; If[IntegerDigits[p1, 2] == Reverse[IntegerDigits[p1, 2]], Sow[p1]]; If[IntegerDigits[p2, 2] == Reverse[IntegerDigits[p2, 2]], Sow[p2]], {n, 0, 9999999}]][[2, 1]]]; Select[p, PrimeQ]
%Y A046472 Cf. A002385 (palindromic primes), A007632 (palindromes in bases 2 and 10).
%K A046472 nonn,hard,base
%O A046472 1,1
%A A046472 _Patrick De Geest_, Aug 15 1998
%E A046472 a(6) (from A007632) added by _T. D. Noe_, Dec 31 2010