A077388 Sums of rows of triangle in A077389.

2, 8, 15, 36, 395, 72, 119, 240, 2349, 300, 539, 276, 923, 714, 435, 496, 629, 702, 2375, 1120, 1995, 1144, 874, 3192, 3925, 2938, 9531, 1960, 10063, 2670, 3441, 4448, 5907, 6358, 9835, 4464, 5069, 3610, 13533, 4000, 6273, 4410, 21113, 12012, 8325

Offset

1,1

Comments

19318176 = A077388(1296) = A077388(2088). Are there any other pairs?. - Naohiro Nomoto, May 17 2003

Links

Table of n, a(n) for n=1..45.

Mathematica

f[n_] := Block[{k = 1, t}, While[t = Table[Prime[i], {i, k, k + n - 1}]; Mod[Plus @@ t, n] > 0, k++ ]; t]; Total /@ Table[f[n], {n, 45}] (* Ray Chandler, Oct 09 2006 *)

Crossrefs

Cf. A054892, A077389, A082638, A122820.

Sequence in context: A295937 A305674 A082638 * A301986 A296798 A203419

Adjacent sequences: A077385 A077386 A077387 * A077389 A077390 A077391

Keyword

nonn

Author

Amarnath Murthy, Nov 06 2002

Extensions

More terms from Sascha Kurz, Jan 30 2003

Status

approved