|
Search: id:A045336
|
|
| |
|
| 2, 3, 5, 7, 353, 373, 727, 757, 32323, 33533, 35353, 35753, 37273, 37573, 72227, 72727, 73237, 75557, 77377, 3222223, 3223223, 3233323, 3252523, 3272723, 3337333, 3353533, 3553553, 3722273, 3732373, 3773773, 7257527, 7327237
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Select[ Range[ 1, 10^7 ], PrimeQ[ # ] && FreeQ[ RealDigits[ # ][ [ 1 ] ], 0 ] && FreeQ[ RealDigits[ # ][ [ 1 ] ], 1 ] && FreeQ[ RealDigits[ # ][ [ 1 ] ], 4 ] && FreeQ[ RealDigits[ # ][ [ 1 ] ], 6 ] && FreeQ[ RealDigits[ # ][ [ 1 ] ], 8 ] && FreeQ[ RealDigits[ # ][ [ 1 ] ], 9 ] && RealDigits[ # ][ [ 1 ] ] == Reverse[ RealDigits[ # ][ [ 1 ] ] ] & ]
|
|
CROSSREFS
|
Cf. A019546 and A002385.
Sequence in context: A052024 A052023 A052025 this_sequence A083183 A046477 A145843
Adjacent sequences: A045333 A045334 A045335 this_sequence A045337 A045338 A045339
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 18 2000
|
|
|
Search completed in 0.002 seconds
|
