A211655 Down-sortable primes: Primes that are also primes after digits are sorted into decreasing order.
2, 3, 5, 7, 11, 13, 17, 31, 37, 41, 43, 53, 61, 71, 73, 79, 83, 97, 113, 131, 149, 157, 163, 167, 179, 181, 191, 197, 199, 211, 241, 251, 281, 311, 313, 331, 337, 347, 359, 373, 389, 419, 421, 431, 433, 443, 461, 463, 491, 521, 541, 563, 571, 593, 613, 617, 631, 641, 643, 653
Offset: 1
Examples
131 is prime and after sorting its digits into nonincreasing order we obtain 311, which is prime. 163 is in the sequence because its digits sorted in decreasing order give 631, which is prime. (Note that this is not a reversible prime, since 361 = 19^2.)
Links
- Francis J. McDonnell, Table of n, a(n) for n = 1..10000
- Francis J. McDonnell, Java Program
Programs
-
Mathematica
Select[Prime[Range[200]], PrimeQ[FromDigits[-Sort[-IntegerDigits[#]]]] &] (* T. D. Noe, Apr 17 2012 *)
Comments