login
A129338
Absolute primes, alternative definition: every permutation of digits is a prime and there are at least two different digits.
4
13, 17, 31, 37, 71, 73, 79, 97, 113, 131, 199, 311, 337, 373, 733, 919, 991
OFFSET
1,1
COMMENTS
No further terms through the 50000th prime, i.e., through 611953. - Harvey P. Dale, May 19 2012.
MATHEMATICA
Select[Prime[Range[5, 170]], And@@PrimeQ[FromDigits/@Permutations[ IntegerDigits[#]]]&] (* Harvey P. Dale, Oct 03 2011 *)
CROSSREFS
See the main entry A003459 for the usual definition.
Sequence in context: A359978 A108388 A083983 * A138535 A116671 A062338
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Mar 26 2008
STATUS
approved