|
| |
|
|
A068652
|
|
Numbers such that every cyclic permutation is a prime.
|
|
13
|
|
|
|
2, 3, 5, 7, 11, 13, 17, 31, 37, 71, 73, 79, 97, 113, 131, 197, 199, 311, 337, 373, 719, 733, 919, 971, 991, 1193, 1931, 3119, 3779, 7793, 7937, 9311, 9377, 11939, 19391, 19937, 37199, 39119, 71993, 91193, 93719, 93911, 99371, 193939, 199933, 319993
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..46.
|
|
|
EXAMPLE
|
197 is a member as all the three cyclic permutations 197,971,719 are primes.
|
|
|
MATHEMATICA
|
fQ[p_] := Module[{b = IntegerDigits[p]}, And @@ Table[PrimeQ[FromDigits[b = RotateLeft[b]]], {Length[b] - 1}]]; Select[Prime[Range[100000]], fQ] (* T. D. Noe, Mar 22 2012 *)
|
|
|
CROSSREFS
|
Cf. A003459, A016114.
Sequence in context: A090933 A107845 A090934 * A003459 A202264 A186307
Adjacent sequences: A068649 A068650 A068651 * A068653 A068654 A068655
|
|
|
KEYWORD
|
base,nonn
|
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 28 2002
|
|
|
EXTENSIONS
|
More terms from Martin Renner, Apr 10 2002
|
|
|
STATUS
|
approved
|
| |
|
|
