|
Search: id:A077389
|
|
|
| A077389 |
|
Form a triangle in which n-th row contains n successive primes whose sum is divisible by n; sequence gives averages of rows. |
|
+0
7
|
|
| 2, 4, 5, 9, 79, 12, 17, 30, 261, 30, 49, 23, 71, 51, 29, 31, 37, 39, 125, 56, 95, 52, 38, 133, 157, 113, 353, 70, 347, 89, 111, 139, 179, 187, 281, 124, 137, 95, 347, 100, 153, 105, 491, 273, 185, 177, 377, 199, 599, 1032, 149, 274, 110, 200, 485, 251, 155, 315
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
FORMULA
|
a(n) = A077388(n)/n
|
|
EXAMPLE
|
Triangle begins:
2
3 5
3 5 7
5 7 11 13
71 73 79 83 89
|
|
MATHEMATICA
|
f[n_] := Block[{k = 1, t}, While[t = Table[Prime[i], {i, k, k + n - 1}]; Mod[Plus @@ t, n] > 0, k++ ]; t]; Mean /@ Table[f[n], {n, 58}] (*Chandler*)
|
|
CROSSREFS
|
Cf. A054892, A077388, A082592, A122820.
Sequence in context: A120770 A073151 A067298 this_sequence A122991 A125728 A156799
Adjacent sequences: A077386 A077387 A077388 this_sequence A077390 A077391 A077392
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 06 2002
|
|
EXTENSIONS
|
More terms from Sascha Kurz (sascha.kurz(AT)uni-bayreuth.de), Jan 30 2003
|
|
|
Search completed in 0.002 seconds
|
