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 A109309 #10 Jul 23 2020 13:53:55 %S A109309 31,71,73,97,311,701,733,743,751,761,907,937,941,953,967,971,983,991, %T A109309 1201,1301,1321,1511,1601,1741,1811,1831,1901,3011,3121,3191,3203, %U A109309 3221,3251,3271,3301,3371,3391,3433,3511,3541,3571,3613,3643,3733,3803,3821 %N A109309 Larger emirps (primes whose digit reversal is a lesser prime). %H A109309 Harvey P. Dale, <a href="/A109309/b109309.txt">Table of n, a(n) for n = 1..1000</a> %t A109309 dr[n_]:=FromDigits[Reverse[IntegerDigits[n]]];Select[Prime[Range[1000]], PrimeQ[dr[ # ]]&&dr[ # ]<#&] %t A109309 Select[Prime[Range[600]],PrimeQ[IntegerReverse[#]]&&#>IntegerReverse[#]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 23 2020 *) %Y A109309 Cf. A006567 Emirps (primes whose digit reversal is a different prime), A109308 Lesser emirps (primes whose digit reversal is a larger prime). %K A109309 base,nonn %O A109309 1,1 %A A109309 _Zak Seidov_, Jun 25 2005