|
|
A263499
|
|
Numbers with nondecreasing digits such that every cyclic shift is a prime.
|
|
2
|
|
|
2, 3, 5, 7, 11, 13, 17, 37, 79, 113, 199, 337, 3779, 1111111111111111111, 11111111111111111111111
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(16) is too big to display, see the b-file.
a(n) is the intersection of the sequences A068652 and A009994. A258706 is a subsequence. Up until a(16) only the term 3779 is missing from A258706.
|
|
LINKS
|
|
|
MATHEMATICA
|
fQ[n_] := Block[{d = IntegerDigits@ n}, And[d == Sort@ d, And @@ Table[PrimeQ@ FromDigits[d = RotateLeft@ d], {Length[d] - 1}]]]; Select[
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|