login
A078449
a(n) = sum of terms in n-th row of A078448.
3
1, 5, 16, 41, 88, 187, 360, 563, 888, 1303, 1810, 2407, 3290, 4263, 5376, 6761, 8470, 10345, 12290, 14661, 17212, 19927, 23272, 26785, 31052, 35169, 40162, 45301, 51148, 57745, 64158, 71345, 79134, 87301, 96374, 105325, 116200, 127259, 138772
OFFSET
1,2
PROG
(PARI) {s=[1]; for (n=2, 40, print1(sum(i=1, n-1, s[i]), ", "); a=s[n-1]; s=[a+1]; for(j=2, n, k=s[j-1]+1; c=1; while(c>0, b=1; for(i=1, matsize(s)[2], if(gcd(k, s[i])>1, b=0)); if(b==0, k++, c=0)); s=concat(s, k)))}
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Nov 27 2002
EXTENSIONS
Edited and extended by Klaus Brockhaus, Dec 10 2002
STATUS
approved