|
|
A098085
|
|
Primes P(n)+P(n+1)+b(n) = least prime >= P(n)+P(n+1), P(i)=i-th prime, b(n) given in A098084.
|
|
2
|
|
|
5, 11, 13, 19, 29, 31, 37, 43, 53, 61, 71, 79, 89, 97, 101, 113, 127, 131, 139, 149, 157, 163, 173, 191, 199, 211, 211, 223, 223, 241, 263, 269, 277, 293, 307, 311, 331, 331, 347, 353, 367, 373, 389, 397, 397, 419, 439, 457, 457, 463, 479, 487, 499, 509, 521
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..55.
|
|
EXAMPLE
|
P(1) + P(2) = 2 + 3 = 5; least prime >= 5 = 5.
P(2) + P(3) = 3 + 5 = 8; least prime > 8 = 11.
P(3) + P(4) = 5 + 7 = 12; least prime > 12 = 13.
|
|
MATHEMATICA
|
f[n_] := Block[{k = 0, p = Prime[n] + Prime[n + 1]}, While[ !PrimeQ[p + k], k++ ]; p + k]; Table[ f[n], {n, 55}] (* Robert G. Wilson v, Sep 24 2004 *)
|
|
CROSSREFS
|
Sequence in context: A023225 A206581 A292940 * A104216 A269819 A040144
Adjacent sequences: A098082 A098083 A098084 * A098086 A098087 A098088
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Pierre CAMI, Sep 13 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v, Sep 25 2004
|
|
STATUS
|
approved
|
|
|
|