login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A116367 Sums of rows of the triangle in A116366. 2
6, 18, 36, 70, 104, 158, 208, 282, 388, 468, 602, 728, 838, 984, 1174, 1382, 1536, 1772, 1986, 2170, 2448, 2698, 3008, 3386, 3684, 3940, 4258, 4530, 4868, 5528, 5910, 6370, 6712, 7340, 7710, 8234, 8776, 9258, 9832, 10424, 10866, 11658, 12128, 12694, 13180 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
FORMULA
a(n) = Sum_{k=1..n} A116366(n,k).
a(n) = (n+1)*A000040(n+1) + A007504(n) - 2.
MATHEMATICA
Table[Sum[Prime[n+1] + Prime[k+1], {k, 1, n}], {n, 1, 50}] (* G. C. Greubel, May 18 2019 *)
PROG
(PARI) vector(50, n, sum(k=1, n, prime(n+1) + prime(k+1))) \\ G. C. Greubel, May 18 2019
(Magma) [(&+[NthPrime(n+1) + NthPrime(k+1): k in [1..n]]): n in [1..50]]; // G. C. Greubel, May 18 2019
(Sage) [sum(nth_prime(n+1) + nth_prime(k+1) for k in (1..n)) for n in (1..50)] # G. C. Greubel, May 18 2019
(GAP) List([1..50], n-> Sum([1..n], k-> Primes[n+1] + Primes[k+1])) # G. C. Greubel, May 18 2019
CROSSREFS
Sequence in context: A028896 A295026 A034857 * A225384 A276480 A180438
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Feb 06 2006
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 14:02 EDT 2024. Contains 371254 sequences. (Running on oeis4.)