|
|
A213903
|
|
Least number x such that there are n numbers of the form 6k-1 or 6k+1 between prime(x) and prime(x+1).
|
|
0
|
|
|
1, 9, 24, 46, 30, 99, 154, 263, 367, 590, 217, 1183, 2191, 1879, 1831, 3077, 2225, 3793, 4612, 4522, 3644, 14862, 12542, 3385, 19026, 17006, 23283, 38590, 14357, 34215, 73321, 30802, 33608, 110224, 85633, 165326, 31545, 40933, 103520, 141718, 224659, 126172
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
Smallest n such that A213902(n)=2 is n=24, so a(2)=24.
|
|
MATHEMATICA
|
nn = 10^6; t = Join[{3}, Union[6 Range[nn] - 1, 6 Range[nn] + 1]]; cnt = 0; t2 = Reap[Do[If[PrimeQ[t[[i]]], Sow[cnt]; cnt = 0, cnt++], {i, Length[t]}]][[2, 1]]; t3 = {}; n = 0; While[pos = Position[t2, n, 1, 1]; pos != {}, AppendTo[t3, pos[[1, 1]]]; n++]; t3 (* T. D. Noe, Jun 26 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|