OFFSET
1,1
COMMENTS
Row sums of triangle A087112.
Sum of semiprimes (A001358) with greater prime factor prime(n). - Gus Wiseman, Dec 06 2020
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..1000
EXAMPLE
The series begins (4, 15, 50, 119, 308,...) since the primes = (2, 3, 5, 7, 11,...) and partial sum of primes = (2, 5, 10, 17, 28,...).
a(5) = 308 = 11 * 28.
a(4) = 119 = sum of row 4 terms of triangle A087112: (14 + 21 + 35 + 49).
MAPLE
A143215:=n->ithprime(n)*sum(ithprime(i), i=1..n); seq(A143215(n), n=1..50); # Wesley Ivan Hurt, Mar 26 2014
MATHEMATICA
Table[Prime[n]*Sum[Prime[i], {i, n}], {n, 50}] (* Wesley Ivan Hurt, Mar 26 2014 *)
PROG
(Haskell)
a143215 n = a000040 n * a007504 n -- Reinhard Zumkeller, Nov 25 2012
(PARI) a(n) = prime(n)*vecsum(primes(n)); \\ Michel Marcus, Jun 15 2024
(Magma)
A143215:= func< n | NthPrime(n)*(&+[NthPrime(j): j in [1..n]]) >;
[A143215(n): n in [1..50]]; // G. C. Greubel, Aug 27 2024
(SageMath)
def A143215(n): return nth_prime(n)*sum(nth_prime(j) for j in range(1, n+1))
[A143215(n) for n in range(1, 51)] # G. C. Greubel, Aug 27 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Gary W. Adamson, Jul 30 2008
EXTENSIONS
More terms from Vladimir Joseph Stephan Orlovsky, Sep 21 2009
STATUS
approved
