A180552 - OEIS

A180552

Primes that become a different prime under the mapping 5 <=> 7.

5, 7, 53, 59, 73, 79, 251, 271, 353, 359, 373, 379, 509, 569, 571, 653, 673, 709, 751, 769, 1151, 1171, 1259, 1279, 1451, 1471, 1523, 1579, 1583, 1723, 1759, 1783, 2351, 2371, 2531, 2549, 2591, 2731, 2749, 2791, 3251, 3271, 3533, 3539, 3559, 3593, 3733

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Index to Primes, Primes that become a different prime under some mapping.

MATHEMATICA

fQ[n_] := Block[{id = IntegerDigits@n}, (MemberQ[id, 5] || MemberQ[id, 7]) && PrimeQ[ FromDigits[ id /. {5 -> 7, 7 -> 5}] ]]; Select[ Prime@ Range@ 550, fQ]

CROSSREFS

Cf. A171039, A175791, A180517 thru A180559, A175789, A180560, A180561.

Sequence in context: A210244 A123789 A367572 * A168545 A376613 A320116

Adjacent sequences: A180549 A180550 A180551 * A180553 A180554 A180555

KEYWORD

base,nonn

AUTHOR

Zak Seidov and Robert G. Wilson v, Sep 09 2010

STATUS

approved