login
A202297
Product of the sum of the first n^2 primes by the sum of the first (n+1)^2 primes.
1
0, 34, 1700, 38100, 403860, 2572620, 11863176, 43468984, 134426588, 364794428, 890218104, 1998186072, 4178379984, 8232956688, 15425693558, 27713583130, 47890427740, 80095432340, 130221623840, 206201325600, 318555575550, 481995772662, 715882366878, 1043383039482
OFFSET
0,2
LINKS
Stephen Balaban, Clojure Code for generating the sequence usage: clj primes.txt n where n is the number of elements of this sequence to print
FORMULA
a(n) = A109724(n)*A109724(n+1).
MATHEMATICA
Table[(Plus@@Prime[Range[n^2]]) (Plus@@Prime[Range[(n + 1)^2]]), {n, 0, 19}] (* Alonso del Arte, Dec 16 2011 *)
PROG
(Clojure) (defn prod-prime-matrix [n] (* (sum-matrix (first-n2-primes n)) (sum-matrix (first-n2-primes (inc n)))))
(Magma) A109724:=func<n|&+[NthPrime(h): h in [1..n^2]]>; [0] cat [A109724(n)*A109724(n+1): n in [1..23]]; // Bruno Berselli, Dec 16 2011
(PARI) a(n) = vecsum(primes(n^2))* vecsum(primes((n+1)^2)); \\ Michel Marcus, Mar 20 2023
CROSSREFS
Cf. A109724.
Sequence in context: A123790 A297636 A212033 * A296673 A086881 A212023
KEYWORD
nonn
AUTHOR
Stephen Balaban, Dec 15 2011
EXTENSIONS
More terms from Bruno Berselli, Dec 16 2011
STATUS
approved