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 A128389 #8 Oct 10 2019 10:23:19
%S A128389 94889,98849,98999,99989,946949,949649,9446989,9464849,9466949,
%T A128389 9468869,9468989,9484649,9489899,9494689,9496649,9648889,9666689,
%U A128389 9688649,9689689,9699889,9844699,9844889,9846989,9864889,9864949,9866669
%N A128389 Emirps with only composite digits (i.e., 4, 6, 8, 9).
%C A128389 Subsequence of A128374.
%t A128389 Select[Prime@Range[10^6], # != r[ # ] && PrimeQ[r[ # ]] && Intersection[IntegerDigits[ # ], {0, 1, 2, 3, 5, 7}] == {} &] (* _Ray Chandler_, Mar 06 2007 *)
%Y A128389 Cf. A006567, A128388, A128390.
%K A128389 nonn,less,base
%O A128389 1,1
%A A128389 _Lekraj Beedassy_, Feb 28 2007
%E A128389 Extended by _Ray Chandler_, Mar 06 2007