login
A077388
Sums of rows of triangle in A077389.
5
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
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
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Nov 06 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 30 2003
STATUS
approved