|
Search: id:A079776
|
|
|
| A079776 |
|
a(n) = sum of n-th row of the triangle pertaining to A079774(n). |
|
+0
3
|
|
| 4, 14, 30, 54, 70, 102, 140, 204, 216, 270, 330, 450, 442, 518, 900, 656, 867, 810, 912, 1020, 1323, 1210, 2070, 1416, 1550, 1989, 1782, 1932, 2088, 2655, 2356, 2528, 5313, 2822, 3570, 3132, 3330, 5605, 3666, 4620, 4018, 4242, 4472, 5610, 4860, 8165, 5264
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MAPLE
|
A002808 := proc(n) local resul, i ; i := 1 ; resul := 4 ; while i < n do resul := resul+1 ; while isprime(resul) do resul := resul+1 ; od ; i := i+1 ; od; RETURN(resul) ; end: A079775 := proc(n) local a, anxt, atst ; a := [A002808(n)] ; while nops(a) < n do anxt := op(-1, a)+1 ; atst := [ op(a), anxt] ; while igcd(op(atst)) = 1 do anxt := anxt+1 ; atst := [ op(a), anxt] ; od ; a := [op(a), anxt] ; od; RETURN(a) ; end: A079776 := proc(n) local arow ; arow := A079775(n) ; add(op(i, arow), i=1..nops(arow)) ; end: for n from 1 to 80 do printf("%d, ", A079776(n)) ; od : - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 01 2007
|
|
CROSSREFS
|
Cf. A079774, A079775.
Sequence in context: A033690 A103779 A049451 this_sequence A117109 A140063 A051409
Adjacent sequences: A079773 A079774 A079775 this_sequence A079777 A079778 A079779
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 03 2003
|
|
EXTENSIONS
|
More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 01 2007
|
|
|
Search completed in 0.002 seconds
|
