|
| |
|
|
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
(list; graph; refs; listen; history; internal format)
|
|
|
|
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
| Cf. A078447, A078448, A078450.
Sequence in context: A202087 A073459 A081997 * A014161 A014166 A014171
Adjacent sequences: A078446 A078447 A078448 * A078450 A078451 A078452
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 27 2002
|
|
|
EXTENSIONS
| Edited and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 10 2002
|
| |
|
|
