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 A128390 #18 May 19 2024 14:35:41
%S A128390 149,199,941,991,1009,1061,1069,1091,1109,1181,1409,1499,1601,1619,
%T A128390 1669,1811,1901,1949,9001,9011,9041,9161,9491,9601,9661,9941,10009,
%U A128390 10061,10069,10091,10499,10889,10891,10909,11149,11161,11489,11699,11909
%N A128390 Emirps with only nonprime digits (i.e., 0, 1, 4, 6, 8, 9).
%t A128390 Select[Prime@Range@(10^4), (r = IntegerReverse@#) != # && PrimeQ@r && Intersection[IntegerDigits@#, {2, 3, 5, 7}] == {} &] (* _Ray Chandler_, Mar 06 2007 corrected by _Hans Rudolf Widmer_, May 18 2024 *)
%Y A128390 Cf. A006567, A128388, A128389.
%K A128390 nonn,less,base
%O A128390 1,1
%A A128390 _Lekraj Beedassy_, Feb 28 2007
%E A128390 Corrected by _Ray Chandler_, Mar 06 2007