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 A029743 #40 Aug 04 2022 15:04:44
%S A029743 2,3,5,7,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97,
%T A029743 103,107,109,127,137,139,149,157,163,167,173,179,193,197,239,241,251,
%U A029743 257,263,269,271,281,283,293,307,317,347,349,359,367,379,389
%N A029743 Primes with distinct digits.
%C A029743 This sequence has 283086 terms, the last being 987654103 = A007810(9). - _Jud McCranie_
%C A029743 Intersection of A010784 and A000040; A178788(a(n)) * A010051(a(n)) = 1. [_Reinhard Zumkeller_, Sep 25 2011]
%H A029743 Reinhard Zumkeller, <a href="/A029743/b029743.txt">Table of n, a(n) for n = 1..283086, full sequence</a>
%H A029743 Patrick De Geest, <a href="http://www.worldofnumbers.com/index.html">World!Of Numbers</a>
%t A029743 t={};Do[p=Prime[n];If[Select[Transpose[Tally[IntegerDigits[p]]][[2]],#>1 &]=={},AppendTo[t,p]],{n,77}];t (* _Jayanta Basu_, May 04 2013 *)
%t A029743 Select[Prime[Range[80]],Max[DigitCount[#]]<2&] (* _Harvey P. Dale_, Sep 13 2020 *)
%o A029743 (Haskell)
%o A029743 a029743 n = a029743_list !! (n-1)
%o A029743 a029743_list = filter ((== 1) . a010051) a010784_list
%o A029743 -- _Reinhard Zumkeller_, Sep 25 2011
%o A029743 (Python)
%o A029743 from sympy import isprime
%o A029743 from itertools import permutations as P
%o A029743 dist = [p for d in range(1, 11) for p in P("0123456789", d) if p[0] != "0"]
%o A029743 afull = [t for t in (int("".join(p)) for p in dist) if isprime(t)]
%o A029743 print(afull[:100]) # _Michael S. Branicky_, Aug 04 2022
%Y A029743 Cf. A000040, A007810, A010051, A010784, A178788.
%K A029743 nonn,fini,full,base
%O A029743 1,1
%A A029743 _Patrick De Geest_