OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
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
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
KEYWORD
nonn
AUTHOR
Stephen Balaban, Dec 15 2011
EXTENSIONS
More terms from Bruno Berselli, Dec 16 2011
STATUS
approved