|
|
A157533
|
|
Emirps using all nonprime digits (0, 1, 4, 6, 8, 9) and no others.
|
|
1
|
|
|
108649, 140869, 168409, 184609, 904861, 906481, 946801, 968041, 1016489, 1041869, 1048609, 1061849, 1064689, 1068409, 1068491, 1084469, 1084609, 1086469, 1089461, 1098469, 1108469, 1146809, 1184069, 1406689, 1406849, 1408619, 1408699, 1460089, 1460189, 1460981
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Subsequence of A128390.
|
|
LINKS
|
K. D. Bajpai, Table of n, a(n) for n = 1..10000
|
|
MATHEMATICA
|
Select[Prime[Range[300000]], Union[IntegerDigits[#]]=={0, 1, 4, 6, 8, 9}&&PrimeQ[IntegerReverse[#]]&&#!=IntegerReverse[#]&] (* K. D. Bajpai, Jan 11 2020 *)
|
|
PROG
|
(Magma) [ n : n in [100000..1410000] | Seqset(D) eq {0, 1, 4, 6, 8, 9}and n ne r and IsPrime(n) and IsPrime(r) where r is Seqint(Reverse(D)) where D is Intseq(n) ]; // Klaus Brockhaus, Mar 08 2009
|
|
CROSSREFS
|
Cf. A128390.
Cf. A006567 (emirps, primes whose reversal is a different prime). - Klaus Brockhaus, Mar 08 2009
Sequence in context: A102333 A236650 A237789 * A233650 A286884 A210083
Adjacent sequences: A157530 A157531 A157532 * A157534 A157535 A157536
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Lekraj Beedassy, Mar 02 2009
|
|
EXTENSIONS
|
Edited by N. J. A. Sloane, Mar 05 2009
More terms from Klaus Brockhaus and Ray Chandler, Mar 08 2009
|
|
STATUS
|
approved
|
|
|
|