|
11, 18, 21, 36, 58, 62, 68, 79, 84, 94, 101, 105, 106, 110, 132, 135, 146, 156, 174, 175, 179, 197, 202, 210, 216, 223, 231, 242, 248, 257, 258, 304, 306, 309, 321, 334, 338, 347, 354, 374, 386, 396, 397, 406, 436, 437, 456, 464, 489, 491, 496, 497, 503, 517
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
m = 1; 1 + Select[ Range[520], Prime[ # + 2] - 2*Prime[ # + 1] + Prime[ # ] - 4*m == 0 &] (* Robert G. Wilson v, Jul 14 2004 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|