This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A225193 Composite numbers such that every non-identity permutation gives a prime. 0
 14, 16, 20, 30, 32, 34, 35, 38, 50, 70, 74, 76, 91, 92, 95, 98, 110, 118, 119, 133, 772, 775, 778, 779, 1118, 3337, 7771, 77779 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS EXAMPLE 772 is a member since both 727 and 277 are primes. MATHEMATICA t={}; Do[p=Permutations[IntegerDigits[n]]; c=Length[p]; cn=Length[Select[Table[FromDigits[k], {k, p}], PrimeQ]]; If[!PrimeQ[n] && c>1 && cn==c-1, AppendTo[t, n]], {n, 10, 100000}]; t CROSSREFS Cf. A003459, A068652, A068653. Sequence in context: A007935 A076055 A068653 * A102616 A291907 A255846 Adjacent sequences:  A225190 A225191 A225192 * A225194 A225195 A225196 KEYWORD nonn,base AUTHOR Jayanta Basu, May 01 2013 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 15 20:11 EDT 2019. Contains 327086 sequences. (Running on oeis4.)