A225438 Odd numbers such that no permutation of its digits yields a prime.

1, 9, 15, 21, 25, 27, 33, 39, 45, 49, 51, 55, 57, 63, 65, 69, 75, 77, 81, 85, 87, 93, 99, 105, 111, 117, 123, 129, 135, 141, 147, 153, 155, 159, 161, 165, 171, 177, 183, 185, 187, 189, 195, 201, 205, 207, 213, 219, 221, 225, 231, 237, 243, 245, 247, 249

Offset

1,2

Comments

Subset of A067013.

Links

Table of n, a(n) for n=1..56.

Example

105 is a member since none of 105, 150, 15, 51, 510, 501 is a prime.

Mathematica

t={}; Do[If[Length[Select[Table[FromDigits[k], {k, Permutations[IntegerDigits[n]]}], PrimeQ]]==0, AppendTo[t, n]], {n, 1, 250, 2}]; t

Crossrefs

Cf. A067013.

Sequence in context: A100819 A046446 A046350 * A175076 A046337 A359596

Adjacent sequences: A225435 A225436 A225437 * A225439 A225440 A225441

Keyword

nonn,base

Author

Jayanta Basu, May 08 2013

Status

approved