|
Search: id:A098969
|
|
| |
|
| 1, 2, 3, 4, 9, 16, 24, 30, 47, 189, 217, 327, 368, 739, 1184, 1663, 2225, 2226, 3385, 3386, 4059, 5949, 14357, 30803, 31545, 33609, 104071, 118505, 325854, 597313, 1319947, 2324142, 4140011, 4258997, 5911616, 8040880, 17567979, 23163300
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
MATHEMATICA
|
a = {1, 2}; b = {0, 1}; d = 1; p = 2; q = 3; Do[ r = Prime[n]; c = r - p - 2; If[c > d, Print[{n + 1, c}]; d = c; AppendTo[a, n - 1]; AppendTo[b, c]]; p = q; q = r, {n, 3, 10^9}]; a (from Robert G. Wilson v Oct 27 2004)
|
|
CROSSREFS
|
Sequence in context: A049909 A096781 A119721 this_sequence A088275 A014281 A086865
Adjacent sequences: A098966 A098967 A098968 this_sequence A098970 A098971 A098972
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
njas, Oct 24 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com) and Olaf Voss (richyfourtythree(AT)yahoo.com), Oct 27 2004
|
|
|
Search completed in 0.002 seconds
|
