|
Search: id:A048890
|
|
|
| A048890 |
|
Primes that yield a different prime when rotated by 180 degrees. |
|
+0
1
|
|
| 19, 61, 109, 199, 601, 661, 1019, 1061, 1091, 1109, 1181, 1601, 1609, 1669, 1699, 1811, 1901, 1999, 6011, 6091, 6101, 6199, 6619, 6661, 6689, 6691, 6899, 6991, 10061, 10069, 10091, 10691, 10861, 10909, 11069, 11681, 11909, 16001, 16619, 16661
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
lst = {}; fQ[n_] := Block[{allset = {0, 1, 6, 8, 9}, id = IntegerDigits@n}, rid = Reverse[id /. {6 -> 9, 9 -> 6}]; Union@ Join[id, allset] == allset && PrimeQ@ FromDigits@ rid && rid != id]; Do[ If[ PrimeQ@n && fQ@n, AppendTo[lst, n]], {n, 16900}]; lst (Robert G. Wilson v)
|
|
CROSSREFS
|
Cf. A007597, A006567, A046732.
Sequence in context: A139981 A141897 A031384 this_sequence A127854 A092327 A139498
Adjacent sequences: A048887 A048888 A048889 this_sequence A048891 A048892 A048893
|
|
KEYWORD
|
base,nonn,easy,nice
|
|
AUTHOR
|
G. L. Honaker, Jr. (honak3r(AT)bvunet.net)
|
|
EXTENSIONS
|
Better definition and more terms from Robert G. Wilson v (rgwv(at)rgwv.com), Feb 27 2007
|
|
|
Search completed in 0.002 seconds
|
