|
| |
|
|
A077389
|
|
Form a triangle in which n-th row contains n successive primes whose sum is divisible by n; sequence gives averages of rows.
|
|
6
| |
|
|
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; refs; listen; history; internal format)
|
|
|
|
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 * A122991 A125728 A173660
Adjacent sequences: A077386 A077387 A077388 * 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
|
| |
|
|
