|
Search: id:A075470
|
|
|
| A075470 |
|
Primes arising from the rearrangement of the natural numbers such that sum of n (n>1) terms starting from the n-th term (included) is a prime (A073672). |
|
+0
2
|
|
| 2, 5, 13, 23, 37, 53, 71, 97, 131, 157, 191, 223, 263, 307, 347, 383, 431, 467, 521, 587, 653, 709, 787, 853, 937, 1009, 1087, 1153, 1237, 1327, 1423, 1511, 1613, 1709, 1823, 1931, 2053, 2161, 2269, 2377, 2503, 2617, 2749, 2879, 3011, 3137, 3299, 3449, 3613
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
a = {2, 1, 4}; f[n_] := Block[{k = 1, b = Take[a, {n, 2n - 3}]}, While[ Position[a, k] != {}, k++ ]; b = Append[b, k]; a = Append[a, k]; While[ Position[a, k] != {} || !PrimeQ[Plus @@ b + k], k++ ]; a = Append[a, k]]; Do[ f[n], {n, 3, 50}]; Table[ Plus @@ Take[a, {n, 2n - 1}], {n, 1, 50}]
|
|
CROSSREFS
|
Cf. A073672.
Sequence in context: A099982 A046696 A102719 this_sequence A049779 A106009 A079780
Adjacent sequences: A075467 A075468 A075469 this_sequence A075471 A075472 A075473
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 18 2002
|
|
|
Search completed in 0.002 seconds
|
