| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
m = 1; 1 + Select[ Range[520], Prime[ # + 2] - 2*Prime[ # + 1] + Prime[ # ] - 4*m == 0 &] (from Robert G. Wilson v Jul 14 2004)
|
|
CROSSREFS
|
Cf. A095419, A095420, A095649, A095650, A095651, A095672, A095673.
Sequence in context: A054306 A093519 A031119 this_sequence A003334 A037006 A066950
Adjacent sequences: A095645 A095646 A095647 this_sequence A095649 A095650 A095651
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Jul 02 2004
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 14 2004
Edited by njas, Nov 07 2005
|
|
