OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
From Michael De Vlieger, Jul 14 2015: (Start)
16 is a term because it is the result of sorting the digits of prime 61 in ascending order, and 61 contains no zeros.
49 is not a term since neither 49 nor 94 are prime, and the prime 409 contains a zero.
133 is a term because while 133 itself is composite, both 313 and 331 are prime and contain no zeros. (End)
MATHEMATICA
Sort@ DeleteDuplicates[FromDigits@ Sort@ IntegerDigits@ # & /@ Select[Prime@ Range@ PrimePi[10^3], Last@ DigitCount@ # == 0 &]] (* Michael De Vlieger, Jul 14 2015 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
EXTENSIONS
More terms from Erich Friedman
Corrected and extended by Michael De Vlieger, Jul 14 2015
STATUS
approved