|
|
A338386
|
|
The smallest number from the n-membered group of single (non-twin) primes.
|
|
0
|
|
|
23, 47, 79, 79, 353, 353, 353, 353, 353, 353, 673, 673, 673, 673, 673, 673, 673, 673, 8641, 8641, 8641, 8641, 13411, 13411, 13411, 14633, 14633, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 24439, 62303, 62303, 62303, 62303
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Note that "single" means both non-twin and not 2.
|
|
LINKS
|
|
|
MATHEMATICA
|
c = cm = s1 = 0; p = 3; q = 5; s = {}; Do[If[c == 0, s1 = q]; r = NextPrime[q]; If[r > q + 2 && q > p + 2, c++, c = 0]; If[c > cm, cm = c; AppendTo[s, s1]]; p = q; q = r, {10^4}]; s (* Amiram Eldar, Oct 25 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|