|
Search: id:A050288
|
|
| |
|
| 10123457689, 10123465789, 10123465897, 10123485679, 10123485769, 10123496857, 10123547869, 10123548679, 10123568947, 10123578649, 10123586947, 10123598467, 10123654789, 10123684759, 10123685749
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Digits may appear multiple times; sequence is infinite.
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
MATHEMATICA
|
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)
|
|
CROSSREFS
|
Cf. A050278.
Adjacent sequences: A050285 A050286 A050287 this_sequence A050289 A050290 A050291
Sequence in context: A017518 A017650 A112388 this_sequence A135047 A017541 A112453
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Eric Weisstein (eric(AT)weisstein.com)
|
|
|
Search completed in 0.002 seconds
|
