A028911 Sort digits of primes into descending order (A028906) then sort this sequence into ascending order.

2, 3, 5, 7, 11, 31, 31, 32, 41, 43, 53, 61, 71, 71, 73, 73, 74, 76, 83, 91, 92, 95, 97, 97, 98, 110, 211, 310, 311, 311, 311, 322, 331, 331, 332, 410, 421, 421, 431, 433, 443, 511, 521, 521, 530, 532, 533, 541, 610, 631, 631, 631, 632, 641, 641, 643, 643, 653

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• base
• easy

Programs

Mathematica

Take[Sort[FromDigits[Reverse[Sort[IntegerDigits[#]]]]&/@Prime[Range[200]]],60] (* Harvey P. Dale, Mar 26 2013 *)

Extensions

More terms from Erich Friedman.