OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..100
MAPLE
a:=n-> mul(ithprime(j), j=1..2*n): seq(a(n), n=0..13); # Emeric Deutsch
MATHEMATICA
Table[Product[Prime[i], {i, 2n}], {n, 0, 20}] (* Wesley Ivan Hurt, Mar 13 2014 *)
PROG
(PARI) a(n) = prod(i=1, 2*n, prime(i)); \\ Michel Marcus, Mar 15 2014
(Magma) [1] cat [&*[NthPrime(j): j in [1..2*n]]: n in [1..20]]; // G. C. Greubel, Sep 04 2019
(Sage) [1]+[product(nth_prime(j) for j in (1..2*n)) for n in (1..20)] # G. C. Greubel, Sep 04 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Nov 19 2004
EXTENSIONS
More terms from Emeric Deutsch, Feb 23 2005
Name revised by Wesley Ivan Hurt, Mar 13 2014
STATUS
approved