|
Search: id:A114229
|
|
|
| A114229 |
|
n(k) is the first number or prime that need minimum the k-th prime to make Prime[n]+2*Prime[k] a prime. |
|
+0
5
|
|
| 2, 3, 34, 10, 47, 20, 46, 52, 221, 462, 92, 77, 619, 94, 319, 2176, 263, 154, 700, 1980, 1336, 928, 2477, 3243, 428, 461, 2146, 4224, 1456, 2735, 3373, 5319, 6439, 4522, 4508, 4516, 11073, 1814, 9940, 10746, 17523, 6680, 16409, 10023, 16107, 14289
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
First appearance of n in sequence 114228; Shows first 161 items; Exist for all n>=1
|
|
MATHEMATICA
|
Do[ns[k] = 0, {k, 1, 2000}]; n2 = 0; n1 = 1; While[n2 <= 200, n1++; p1 = Prime[n1]; n2 = 1; p2 = 2; While[cp = p1 + 2*p2; ! PrimeQ[cp], n2++; p2 = Prime[n2]]; If[ns[n2] == 0, ns[n2] = n1; Print[n2, "[", n1, "]"]]]; Table[ns[k], {k, 1, n2}]
|
|
CROSSREFS
|
Cf. A114228, A114227.
Sequence in context: A062922 A080471 A023184 this_sequence A032816 A073657 A025136
Adjacent sequences: A114226 A114227 A114228 this_sequence A114230 A114231 A114232
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Lei Zhou (lzhou5(AT)emory.edu), Nov 18 2005
|
|
|
Search completed in 0.002 seconds
|
