

A198047


Primes remaining primes under map 3<=>5 (interchange of decimal digits 3 and 5).


1



2351, 2531, 3251, 3257, 3457, 3547, 3581, 3659, 5231, 5237, 5347, 5381, 5437, 5639, 13151, 13159, 13577, 13591, 13751, 13757, 13759, 15131, 15139, 15377, 15391, 15731, 15737, 15739, 17359, 17539, 23057, 23357, 23459, 23509, 23537, 23549, 23567, 25037, 25309
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Only primes containing at least one "3" and one "5" are considered.
Inspired by history (told by VIA himself) that most often mistakes made by V. I. Arnold were caused by mixing 3's and 5's (and also 2's and 9's) in the lengthy calculations by hand.


LINKS

Table of n, a(n) for n=1..39.
V. I. Arnold, Experimental observation of mathematical facts (in Russian)


EXAMPLE

2351,2531 both primes; 3251, 5231 both primes.


MATHEMATICA

p = 53; Reap[Do[id = IntegerDigits[p]; If[Count[id, 3] > 0 && Count[id, 5] > 0 && PrimeQ[FromDigits[(id /. {3 > a, 5 > 3}) /. {a > 5}]], Sow[p]]; p = NextPrime[p], {10^4}]][[2, 1]]


CROSSREFS

Sequence in context: A045306 A264943 A224684 * A179137 A003552 A173628
Adjacent sequences: A198044 A198045 A198046 * A198048 A198049 A198050


KEYWORD

nonn,base


AUTHOR

Zak Seidov, Oct 20 2011


STATUS

approved



