|
|
A216296
|
|
Values of k such that 10k + 3 is the only prime between 10k and 10k + 9.
|
|
1
|
|
|
11, 29, 68, 74, 77, 86, 95, 98, 116, 119, 137, 152, 158, 173, 182, 191, 200, 205, 215, 221, 224, 227, 242, 250, 263, 266, 275, 284, 302, 341, 343, 359, 362, 364, 380, 383, 386, 436, 437, 446, 449, 452, 458, 460, 466, 470, 473, 494, 497, 515, 532, 533, 548
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
t = {}; Do[ps = Select[Range[10*n, 10*n + 9], PrimeQ]; If[ps == {10*n + 3}, AppendTo[t, n]], {n, 0, 647}]; t (* T. D. Noe, Sep 03 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|