A180533 Primes that become a different prime under the mapping 2 <=> 3.

2, 3, 127, 137, 211, 227, 311, 337, 421, 431, 829, 839, 1021, 1031, 1201, 1231, 1237, 1301, 1321, 1327, 1429, 1439, 1627, 1637, 2011, 2027, 2089, 2131, 2207, 2221, 2239, 2309, 2339, 2351, 2357, 2371, 2399, 2467, 2539, 2557, 2617, 2621, 2659, 2671, 2677

Offset

1,1

Links

Robert Price, Table of n, a(n) for n = 1..8672

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

Mathematica

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

Crossrefs

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

Sequence in context: A334661 A258968 A125674 * A095841 A004865 A006286

Adjacent sequences: A180530 A180531 A180532 * A180534 A180535 A180536

Keyword

base,nonn

Author

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

Status

approved