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 A129864 #17 Feb 04 2025 08:59:32
%S A129864 13,31,37,73,79,739,769,937,991,1009,1021,1201,1231,1249,1471,1597,
%T A129864 1723,1831,1879,1933,3049,3109,3121,3163,3301,3433,3571,3613,3697,
%U A129864 3889,7207,7321,7459,7507,7603,7687,7717,7951,7963,9349,9403,9421,9547,9613,9643
%N A129864 Numbers that are both lucky and emirp.
%H A129864 Amiram Eldar, <a href="/A129864/b129864.txt">Table of n, a(n) for n = 1..10000</a>
%F A129864 Intersection of A000959 and A006567.
%e A129864 a(9) = 1009 because 1009 is a lucky number A000959(154) and 1009 is an emirp because 1009 is prime and R(1009) = 9001 is prime.
%t A129864 L = Table[2*i + 1, {i, 0,5* 10^3}]; For[n = 2, n < Length[L], r = L[[n++]]; L = ReplacePart[L, Table[r*i -> Nothing, {i, 1, Length[L]/r}]]];Select[L,PrimeQ[#]&&PrimeQ[IntegerReverse[#]]&&IntegerReverse[#]!=#&] (* _James C. McMahon_, Feb 02 2025 *)
%Y A129864 Cf. A000040, A000959, A004086, A006567, A031157.
%K A129864 base,easy,nonn,less
%O A129864 1,1
%A A129864 _Jonathan Vos Post_, May 23 2007
%E A129864 Corrected and extended by _R. J. Mathar_, Jun 12 2007