%I A050288
%S A050288 10123457689,10123465789,10123465897,10123485679,10123485769,
%T A050288 10123496857,10123547869,10123548679,10123568947,10123578649,
%U A050288 10123586947,10123598467,10123654789,10123684759,10123685749
%N A050288 Pandigital primes.
%C A050288 Digits may appear multiple times; density n/log n (almost all primes 
               are pandigital).
%H A050288 Charles R Greathouse IV, <a href="b050288.txt">Table of n, a(n) for n=1..10000</
               a>.
%H A050288 Eric Weisstein's World of Mathematics, "<a href="http://mathworld.wolfram.com/
               PandigitalNumber.html">Pandigital Number</a>".
%t A050288 ta={{0}};Do[u=Union[IntegerDigits[n]]; If[Equal[u, {0, 1, 2, 3, 4, 5, 
               6, 7, 8, 9}]&&PrimeQ[n], ta=Append[ta, n]], {n, 10123456789, 20000000000}];
               ta (Labos)
%Y A050288 Cf. A050278.
%Y A050288 Sequence in context: A017518 A017650 A112388 this_sequence A159569 A159292 
               A144648
%Y A050288 Adjacent sequences: A050285 A050286 A050287 this_sequence A050289 A050290 
               A050291
%K A050288 nonn,base
%O A050288 1,1
%A A050288 Eric Weisstein (eric(AT)weisstein.com)